This is the second disk of the PASCAL TUTOR system. It has the
Submitted By:
WEBMASTER
Rating:
(Not rated) (
Rate It)
(* Chapter 3 - Program 2 *)
program More_Integer_Demos;
var X,Y : integer;
Count : integer;
begin
X := 12;
Y := 13;
Count := X + Y;
Write('The value of X is');
Writeln(X:4);
Write('The value of Y is');
Writeln(Y:5);
Write('And Count is now ');
Write(Count:6);
Writeln;
end.
