Are you blogging on PH? Get your free blog.

View \INTVAR.PAS

This is the second disk of the PASCAL TUTOR system. It has the

Submitted By: WEBMASTER
Rating: (Not rated) (Rate It)


(* Chapter 3 - Program 1 *)
program Integer_Variable_Demo;

var Count     : integer;
    X,Y       : integer;

begin
   X := 12;
   Y := 13;
   Count := X + Y;
   Writeln('The value of X is',X:4);
   Writeln('The value of Y is',Y:5);
   Writeln('And Count is now ',Count:6);
end.

corner
© 1996-2008. All rights reserved. Reproduction in whole or in part, in any form or medium without express written permission is prohibited.
Violators of this policy may be subject to legal action. Please read our Terms Of Use and Privacy Statement for more information.
Publisher: Lars Hagelin.
bootstrapLabs Logo A bootstrapLabs project.