home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #6 / amigamamagazinepolishissue1998.iso / coders / jËzyki_programowania / amigae / e_v3.2a / src / various / prime.e < prev    next >
Text File  |  2001-03-31  |  109b  |  5 lines
  1. PROC main()
  2.   DEF i=9,j=99
  3.   WHILE i-- DO IF Mod(j,i)=0 THEN IF i-- THEN i:=j-- ELSE WriteF('\d ',j)
  4. ENDPROC
  5.