program FOR_TEST ( output ); var s, j, k, i, l : integer; begin s := 0; for j:= 1 to 5 do begin write( j ); s := s + j end; writeln( s ); for k := 0 to 1 do write( k ); for i := 10 downto 1 do writeln( i ); j := 3; k := 8; l := 2; for i := j to k do writeln( i + l ) end. Class Exercise .. Output of program FOR_TEST is, 1234515 0110 9 8 7 6 5 4 3 2 1 5 6 7 8 9 10