Return to synerr2.p CVS log

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

BSD 4.3reno

program synerr2(input,outpu);
integer a(10)
begin
	read(b);
	for c := 1 to 10 do
		a(c) := b * c;
end.

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