/media/sda-magnetic/david/Dok-15-2023-11-27/fernuni-hagen/cs-i-ii/old-cs-2-03/pascal-compiler/siac4t/test09.txt

while i < a do 
  while i < a + c + 3 + (24 + 22) * 5 do
    i := (b + d)*e+d*(f*g)
  od
od;

while i < a do 
  while i < a + c do
    i := (b + d)*e+d*(f*g)
  od
od;

while i < a do 
  while i < a + c do
    i := (b + d)*e+d*(f*g)
  od
od;

print a;
print c;

while i < a do 
  while i < a + c do
    i := (b + d)*e+d*(f*g);
    j := a;
    q := b;
    print q;
    print a;
    q := 2
  od
od;

j := b;
j := a;

if i < a then
  i := a;
  j := b
else
  if z < b then
    i := x;
    z := y
  fi
fi

end.