home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1990 November / 64er_Magazin_90-11_1990_Markt__Technik_de_Side_A.d64 / ggt (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  298b  |  14 lines
  1. 10 print"[147]":rem groesster gemeinsamer teiler
  2. 20 print"groesster gemeinsamer teiler
  3. 30 [153]"****************************"
  4. 40 [153]"euklidischer algorithmus"
  5. 45 [133]" 1. zahl";a
  6. 50 [133]" 2. zahl";b
  7. 60 [139]a[179]b[167] s[178]a:a[178]b:b[178]s
  8. 70 c[178]a[173]b
  9. 80 [139]c[178][181](c)[167]t[178]b:[137]120
  10. 90 r[178]a[171][181](c)[172]b
  11. 100 a[178]b:b[178]r
  12. 110 [139]r[179][177]0[167]t[178]r:[137]70
  13. 120 [153][163]20)"ggt="t
  14.