{ *************************************************************** }
{ Artificial example showing sequential processing of statements, }
{ use of variables, and assignment. NOT to be regarded as an      }
{ example of good programming style.                              } 
{ *************************************************************** }

program example1(input, output);

{ Declare three integer (whole number) variables }
var I,J,K : integer;

begin
{ Give initial values for I, J and K }
I := 0; J := 2; K := 5;
writeln( 'I = ', I:1, ', J = ', J:1, ', K = ', K:1 );

{ Reassign I }
I := J + K;
writeln( 'I = ', I:1, ', J = ', J:1, ', K = ', K:1 );

{ Reassign I again, and J }
I := I + 1;
J := J + I;
writeln( 'I = ', I:1, ', J = ', J:1, ', K = ', K:1 );
end.