home *** CD-ROM | disk | FTP | other *** search
/ GEMini Atari / GEMini_Atari_CD-ROM_Walnut_Creek_December_1993.iso / files / language / isetl / gcd.t < prev    next >
Encoding:
Text File  |  1987-08-20  |  135 b   |  15 lines
  1. program x;
  2.     read a;
  3.     read b;
  4.     while a/= 0 do
  5.     print [a,b];
  6.     read a;
  7.     read b;
  8.     end;
  9.     print "done";
  10.     end;
  11.  
  12. 1;2;
  13. 3;4;
  14. 0;0;
  15.