|
|
1.1 root 1: program assign (input, output);
2:
3: var a : array [1..100] of char;
4: begin
5: a := 'blah';
6: write(output, a);
7: end.
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.