home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / bsd_srcs / share / doc / ps1 / 04.pascal / synerr.p < prev    next >
Encoding:
Text File  |  1990-06-07  |  123 b   |  10 lines
  1. program syn(output);
  2. var i, j are integer;
  3. begin
  4.     for j :* 1 to 20 begin
  5.         write(j);
  6.         i = 2 ** j;
  7.         writeln(i))
  8.     end
  9. end.
  10.