File TEST3.PS
Directory of image this file is from
This file as a plain text file
PROGRAM TEST3 (INPUT,OUTPUT);
VAR CH,CH1: CHAR;
I,J,K: INTEGER;
X,Y: REAL;
BEGIN
REPEAT
WRITE("INTEGER"); READLN(I); WRITELN;
WRITE("REALS"); READLN(X,Y); WRITELN;
WRITE("CHARACTERS"); READLN(CH); READ(CH1); WRITELN;
WRITELN(I,X,Y," ",CH,CH1)
UNTIL CH = "E"
END.
Feel free to contact me, David Gesswein djg@pdp8online.com
with any questions, comments on the web site, or if you have related equipment,
documentation, software etc. you are willing to part with. I am
interested in anything PDP-8
related, computers, peripherals used with them, DEC or third party, or
documentation.
PDP-8 Home Page
 PDP-8 Site Map
 PDP-8 Site Search