begin
  integer i, j, k, l;
  integername p, q
  
  i = 20; j = 25; k = 21; l = 27;
  p == j; q == l;
  cycle
    i = j; p = q
  repeat until k=3 or (i=p and l=1)
endofprogram