home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1990 November / 64er_Magazin_90-11_1990_Markt__Technik_de_Side_A.d64 / primzahlen (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  152b  |  12 lines
  1. 10 print"[147]":rem primzahlen
  2. 20 print"primzahlen"
  3. 30 print"**********"
  4. 40 print2;3;
  5. 50 f=3
  6. 60 fori=3toint(sqr(f))step2
  7. 70 iff/i=int(f/i)then100
  8. 80 nexti
  9. 90 printf;
  10. 100 f=f+2
  11. 110 goto60
  12.