home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 90xx / 9011a.d64 / ggt (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  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.