Return to synerr2.p CVS log

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

Annotation of 43BSDReno/share/doc/ps1/04.pascal/synerr2.p, revision 1.1.1.1

1.1       root        1: program synerr2(input,outpu);
                      2: integer a(10)
                      3: begin
                      4:        read(b);
                      5:        for c := 1 to 10 do
                      6:                a(c) := b * c;
                      7: end.

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