Return to expotst.p CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / ucb / pascal / tstpx / src

Annotation of 43BSDTahoe/ucb/pascal/tstpx/src/expotst.p, revision 1.1.1.1

1.1       root        1: program test(output);
                      2: var
                      3: x :real;
                      4: begin
                      5: while not eof do begin
                      6:        readln(x);
                      7:        writeln(expo(x))
                      8:        end
                      9: end.

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.