Return to kat.p CVS log

Up to [CSRG BSD Unix] / 43BSDReno / share / doc / ps1 / 04.pascal

Annotation of 43BSDReno/share/doc/ps1/04.pascal/kat.p, revision 1.1

1.1     ! root        1: program kat(input, output);
        !             2: var
        !             3:     ch: char;
        !             4: begin
        !             5:     while not eof do begin
        !             6:        while not eoln do begin
        !             7:            read(ch);
        !             8:            write(ch)
        !             9:        end;
        !            10:        readln;
        !            11:        writeln
        !            12:     end
        !            13: end { kat }.

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