home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / MBUG / MBUG114.ARC / P.VAL < prev    next >
Text File  |  1979-12-31  |  256b  |  11 lines
  1. .begin
  2. .integer x ;
  3. 0 =: x ;
  4. .until x .= 15 .do
  5.     .begin
  6.     edit ( 1 + 14*x - x*x , '+' ) ;
  7.     print ;
  8.     x + 1 =: x
  9.     .end
  10. .end
  11.