projects
/
pdp8.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
Add README.md
[pdp8.git]
/
sw
/
src
/
pascal
/
COPY.PS
1
PROGRAM COPY(INPUT,OUTPUT);
2
VAR C: CHAR;
3
BEGIN
4
WHILE NOT EOF DO
5
BEGIN
6
WHILE NOT EOLN DO
7
BEGIN READ(C); WRITE(C) END;
8
READLN; WRITELN
9
END
10
END.