Return to hugereal.p CVS log

Up to [CSRG BSD Unix] / 43BSDReno / pgrm / pascal / tstpx / src

Annotation of 43BSDReno/pgrm/pascal/tstpx/src/hugereal.p, revision 1.1.1.1

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.