program test1
beginprogram
      i = 1;
      j = 10; 
      while (i <= j) do 
	i = i + 2;
	j = j - 1; 
      done
endprogram