|
|
1.1 ! root 1: program hugereal(input,output); ! 2: var ! 3: r : real; ! 4: errno : integer; ! 5: begin ! 6: writeln('errno = ', errno); ! 7: write('gimme a real '); ! 8: readln(r); ! 9: writeln('that was a really satisfying',r); ! 10: writeln('errno = ', errno); ! 11: end.
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.