Return to expotst.p CVS log

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

Annotation of 43BSDReno/pgrm/pascal/tstpx/src/expotst.p, revision 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.