6
a/ALGOL 60.algol60
Normal file
6
a/ALGOL 60.algol60
Normal file
@@ -0,0 +1,6 @@
|
||||
BEGIN
|
||||
FILE F(KIND=REMOTE);
|
||||
EBCDIC ARRAY E[0:11];
|
||||
REPLACE E BY "HELLO WORLD";
|
||||
WRITE(F, *, E);
|
||||
END.
|
||||
Reference in New Issue
Block a user