/media/sda-magnetic/david/Extern-Magnetic-2022-06-29/Extern01/Dokumente-11-2021-07-05/informatik-math/comp-2021-09-07/Testmenge4tmp.txt

a) 

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;

b)


$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;



$a := 0;

if ($a == 1) then 
begin 
    echo $a
end


$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


c) 

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a < 1) then 
begin 
    echo $a
end


$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


d)

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a > 1) then 
begin 
    echo $a
end

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


e) 

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a != 1) then 
begin 
    echo $a
end


$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


f)

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a <= 1) then 
begin 
    echo $a
end


$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


g)

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a >= 1) then 
begin 
    echo $a
end


$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


h)

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a <= 1) then 
begin 
    echo $a
end


$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


i)

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a >= -1) then 
begin 
    echo $a
end


$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


j)

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;

$a := 0;

if ($a <= -1) then 
begin 
    echo $a
end


$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


k)

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end
else
begin
    echo 2
end;


$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


l)


$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a == 1) then 
begin 
    echo $a
end
else
begin
    echo 2
end;

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;

m)

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;

$a := 0;

if ($a < 1) then 
begin 
    echo $a
end
else
begin
    echo 2
end;

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;

n)

+++++++++++++++++++++++++++++++++++++

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a > 1) then 
begin 
    echo $a
end
else
begin
    echo 2
end

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


e) 

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a != 1) then 
begin 
    echo $a
end
else
begin
    echo 2
end;

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;




f) 

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;

$a := 0;

if ($a <= 1) then 
begin 
    echo $a
end
else
begin
    echo 2
end;

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


g) 

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a >= 1) then 
begin 
    echo $a
end
else
begin
    echo 2
end;

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


h) 

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a <= 1) then 
begin 
    echo $a
end
else
begin
    echo 2
end;

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;



i) 

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a >= -1) then 
begin 
    echo $a
end
else
begin
    echo 2
end;

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


j) 

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;


$a := 0;

if ($a <= -1) then 
begin 
    echo $a
end
else
begin
    echo 2
end;

$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;







+++++++++++++++++++++++++++++++++++++++++++++++++


3. WHILE DO
3.1. Kleiner

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;

$a := 0;
while $a < 10 do 
begin
    echo $a;
    $a := $a+1
end;

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


3.2. Kleiner gleich

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


$a := 0;
while $a <= 10 do 
begin
    echo $a;
    $a := $a+1
end;

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


3.3. Multiplikation 

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


$a := 0;
while $a <= 10 do 
begin
    echo $a;
    $a := $a*2
end;

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


3.4. Multiplikation 

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


$a := 1;
while $a <= 10 do 
begin
    echo $a;
    $a := 2*$a
end;

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


3.5. Multiplikation, komplizierte Terme

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


$a := 0;
while $a <= 10 do 
begin
    echo $a;
    $a := $a*2+4
end;

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


3.6. Multiplikation, komplizierte Terme
$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;



$a := 0;
while $a <= 10 do 
begin
    echo $a;
    $a := 4+$a*2
end;

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


3.7. Multiplikation, komplizierte Terme
$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


$a := 0;
while $a <= 10 do 
begin
    echo $a;
    $a := (4+$a)*2
end;

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


3.7. Multiplikation, mehrere Variablane

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


$a := 0;
$i := 0;
while $i < 10 do 
begin
    echo $a;
    $a := (4+$a)*2
    $i := $i+1;
end;

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


3.8. Kompliziert

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


$a := 0;
$i := 0;
while $i+$a < 10 do 
begin
    echo $a;
    $a := $a*2
    $i := $i+1;
end;


$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;

3.9 Verschachtelte Schleifen 

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;

$i := 0;
while $i < 10 do
begin
    $j := 0;
    while $j < 10 do
    begin
        echo $j;
        echo $i;
        $j := $j+1
    end
    $i := $i+1
end

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;

3.10. Arrays

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


$i := 0;
while $i < 10 do
begin 
    $a [$i] = sin ($i);
    $i := $i+1
end;

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;

$i := 0;
while $i < 10 do
begin
    echo $a [$i];
    $i := $i+1
end

3.11. Mehrdimensionale Arrays

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


$i := 0;
while $i < 10 do
begin 
    $j := 0;
    while $j < 10 do
    begin
        $a [$i][$j] = $i*10+$j
        $j := $j+1;
    end;
    $i := $i+1
end;

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


3.12. Sortieralgorithmus

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


$i := 0;
$a [0] := 12;
$a [1] := 8;
$a [2] := 1;
$a [3] := 7;
$a [4] := 9;
$a [5] := 2;
$a [6] := 6;
$a [7] := 10;
$a [8] := 4;

$i := 0;
while $i < 9 do
begin 
    $j := $i+1;
    while $j < 9 do
    begin
        if $a[$j] < $a [$i] then
        begin
            $tmp := $a [$i];
            $a [$i] := $a [$j];
            $a [$j] := $tmp
        end;
        $j := $j+1
    end;
    $i := $i+1
end


$i := 0;
while $i < 9 do
begin 
    echo $a [$i];
    $i := $i+1
end

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;

39. Ausdrücke

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


$tc := 5;
echo $tc;
$tb := 6;
echo $tb;
$ta := $tb + $tc;
echo $ta;
$ta := 2*($tb+$tc);
echo $ta;
$ta := (2*($tb+$tc)+4)*3;
echo $ta;

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


$tc := (5);
echo $tc;
$tb := (6);
echo ($tb);
$ta := ($tb + $tc);
echo ($ta);
$ta := (2*($tb+$tc));
echo ($ta);
$ta := ((2*($tb+$tc)+4)*3);
echo ($ta);

$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;


$tc := ((5));
echo $tc;
$tb := ((6));
echo (($tb));
$ta := (($tb + $tc));
echo (($ta));
$ta := ((2*($tb+$tc)));
echo (($ta));
$ta := (((2*($tb+$tc)+4)*3));
echo (($ta));


$a := 0;

if ($a == 0) then 
begin 
    echo $a
end;