home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.barnyard.co.uk
/
2015.02.ftp.barnyard.co.uk.tar
/
ftp.barnyard.co.uk
/
cpm
/
walnut-creek-CDROM
/
CPM
/
TURBOPAS
/
TTUTOR1.LBR
/
PROG4.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
2000-06-30
|
512b
|
19 lines
PROGRAM PROG4;
{$U+
New Topics: Input using ReadLn statement
Integer variables
VAR Declarations
}
VAR
Number : Integer;
BEGIN
Write('Enter a number (no decimals please): ');
ReadLn(Number);
WriteLn; { Display one blank line }
WriteLn('Number: ',Number); { Display the number entered }
END.