_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

1.NICO-GGT+KGV

FILE INFORMATION

FILENAME(S): 1.NICO-GGT+KGV

FILE TYPE(S): PRG

FILE SIZE: 2.5K

FIRST SEEN: 2025-12-02 23:47:24

APPEARS ON: 2 disk(s)

FILE HASH

54046513257c9da37a615f6b8d803f37b48d3e2f64dfda9b344ed76bb7fbc951

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
DANI 1 1.NICO-GGT+KGV PRG swasti, flohmarkt 19 8 DOWNLOAD FILE
DANI 1 1.NICO-GGT+KGV PRG swasti, flohmarkt 19 8 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: D0 18 32 38 31 2C 31 34  3A 99 22 93 22 45 52 24  |..281,14:."."ER$|
00000010: 3A 57 45 24 B2 22 31 2E  DA 41 48 4C 3A 20 22 AA  |:WE$."1..AHL: ".|
00000020: C4 28 41 29 AA 22 20 20  20 32 2E DA 41 48 4C 3A  |.(A)."   2..AHL:|
00000030: 22 AA C4 28 42 29 3A 9E  50 41 2C 35 2C 31 2C 22  |"..(B):.PA,5,1,"|
00000040: 90 D7 41 53 20 49 53 54  20 44 45 52 20 47 52 4F  |..AS IST DER GRO|
00000050: 45 53 53 54 45 20 47 45  4D 45 49 4E 53 41 4D 45  |ESSTE GEMEINSAME|
00000060: 20 D4 45 49 4C 45 52 22  3A 99 22 11 20 56 4F 4E  | .EILER":.". VON|
00000070: 22 41 22 55 4E 44 22 42  22 3F 22 3A 9E 50 41 2C  |"A"UND"B"?":.PA,|
00000080: 31 33 2C 31 32 2C 22 05  47 47 D4 20 3D 20 22 C8  |13,12,".GG. = ".|
00000090: 28 42 4C 24 2C 32 35 29  3A 5A 5A B2 31 33 3A 58  |(BL$,25):ZZ.13:X|
000000A0: 58 B2 31 38 3A 8D 32 37  30 30 00 89 19 EE 07 8B  |X.18:.2700......|
000000B0: 52 46 B0 4D 4E A7 31 39  38 30 00 AA 19 F8 07 58  |RF.MN.1980.....X|
000000C0: B2 43 3A 54 24 B2 22 47  47 D4 20 22 3A 8D 33 30  |.C:T$."GG. ":.30|
000000D0: 39 30 3A 8B 41 51 A7 31  38 32 30 00 80 1A 02 08  |90:.AQ.1820.....|
000000E0: 97 35 33 32 38 30 2C 31  35 3A 97 35 33 32 38 31  |.53280,15:.53281|
000000F0: 2C 31 35 3A 99 22 93 11  11 11 11 11 22 54 52 24  |,15:."......"TR$|
00000100: 3A 99 22 1F 11 C4 45 52  20 41 4C 54 45 20 C5 55  |:."...ER ALTE .U|
00000110: 4B 4C 49 44 20 48 41 54  20 48 45 52 41 55 53 47  |KLID HAT HERAUSG|
00000120: 45 46 55 4E 44 45 4E 2C  44 41 53 53 22 3A 99 22  |EFUNDEN,DASS":."|
00000130: 11 4D 41 4E 20 20 44 45  4E 20 20 47 52 4F 45 53  |.MAN  DEN  GROES|
00000140: 53 54 45 4E 20 20 47 45  4D 45 49 4E 53 41 4D 45  |STEN  GEMEINSAME|
00000150: 4E 20 D4 45 49 4C 45 52  22 3A 99 22 11 4D 49 54  |N .EILER":.".MIT|
00000160: 20 C8 49 4C 46 45 20 45  49 4E 45 52 20 CB 45 54  | .ILFE EINER .ET|
00000170: 54 45 4E 44 49 56 49 53  49 4F 4E 20 45 52 48 41  |TENDIVISION ERHA|
00000180: 45 4C 54 2E 22 3A 99 22  11 C4 45 53 48 41 4C 42  |ELT.":."..ESHALB|
00000190: 20 20 57 49 52 44 20 20  44 49 45 53 45 52 20 CC  |  WIRD  DIESER .|
000001A0: 4F 45 53 55 4E 47 53 57  45 47 20 20 41 55 43 48  |OESUNGSWEG  AUCH|
000001B0: 22 00 40 1B 34 08 99 22  11 C5 55 4B 4C 49 44 49  |".@.4.."..UKLIDI|
000001C0: 53 43 48 45 52 20 C1 4C  47 4F 52 49 54 48 4D 55  |SCHER .LGORITHMU|
000001D0: 53 20 47 45 4E 41 4E 4E  54 2E 11 22 3A 99 54 52  |S GENANNT..":.TR|
000001E0: 24 3A 8D 31 37 38 30 3A  99 22 93 11 11 22 54 52  |$:.1780:."..."TR|
000001F0: 24 3A 99 22 1F 11 C2 45  49 20 20 44 49 45 53 45  |$:."...EI  DIESE|
00000200: 52 20 20 CB 45 54 54 45  4E 44 49 56 49 53 49 4F  |R  .ETTENDIVISIO|
00000210: 4E 20 20 57 49 52 44 20  20 44 49 45 22 3A 99 22  |N  WIRD  DIE":."|
00000220: 47 52 4F 45 53 53 45 52  45 20 DA 41 48 4C 20 44  |GROESSERE .AHL D|
00000230: 55 52 43 48 20 44 49 45  20 4B 4C 45 49 4E 45 52  |URCH DIE KLEINER|
00000240: 45 20 20 47 45 2D 22 3A  99 22 54 45 49 4C 54 20  |E  GE-":."TEILT |
00000250: 55 4E 44 20 44 45 52 20  D2 45 53 54 20 42 45 53  |UND DER .EST BES|
00000260: 54 49 4D 4D 54 2E 20 C4  41 4E 4E 20 57 49 52 44  |TIMMT. .ANN WIRD|
00000270: 22 00 14 1C 5C 08 99 22  44 49 45 20 4B 4C 45 49  |"...\.."DIE KLEI|
00000280: 4E 45 52 45 20 DA 41 48  4C 20 44 55 52 43 48 20  |NERE .AHL DURCH |
00000290: 44 49 45 53 45 4E 20 D2  45 53 54 20 47 45 2D 22  |DIESEN .EST GE-"|
000002A0: 3A 99 22 54 45 49 4C 54  20 55 4E 44 20 45 52 4E  |:."TEILT UND ERN|
000002B0: 45 55 54 20 44 45 52 20  D2 45 53 54 20 42 45 53  |EUT DER .EST BES|
000002C0: 54 49 4D 4D 54 2E 22 3A  99 22 CA 45 54 5A 54 20  |TIMMT.":.".ETZT |
000002D0: 57 49 52 44 20 44 45 52  20 45 52 53 54 45 20 20  |WIRD DER ERSTE  |
000002E0: D2 45 53 54 20 20 44 55  52 43 48 20 20 44 45 4E  |.EST  DURCH  DEN|
000002F0: 22 3A 99 22 5A 57 45 49  54 45 4E 20 D2 45 53 54  |":."ZWEITEN .EST|
00000300: 20 47 45 54 45 49 4C 54  20 20 55 4E 44 20 20 57  | GETEILT  UND  W|
00000310: 49 45 44 45 52 20 20 45  49 4E 22 3A 99 22 4E 45  |IEDER  EIN":."NE|
00000320: 55 45 52 20 D2 45 53 54  20 42 45 53 54 49 4D 4D  |UER .EST BESTIMM|
00000330: 54 2E 2E 2E 2E 20 55 4E  44 20 53 4F 20 47 45 48  |T.... UND SO GEH|
00000340: 54 20 45 53 22 00 D0 1C  8E 08 99 22 57 45 49 54  |T ES"......"WEIT|
00000350: 45 52 20 42 49 53 20 44  45 52 20 D2 45 53 54 20  |ER BIS DER .EST |
00000360: 20 47 4C 45 49 43 48 20  30 20 49 53 54 2E 20 C4  | GLEICH 0 IST. .|
00000370: 45 52 22 3A 99 22 D2 45  53 54 20 44 41 56 4F 52  |ER":.".EST DAVOR|
00000380: 20 49 53 54 20 44 41 4E  4E 20 44 45 52 20 20 47  | IST DANN DER  G|
00000390: 52 4F 45 53 53 54 45 20  20 47 45 2D 22 3A 99 22  |ROESSTE  GE-":."|
000003A0: 4D 45 49 4E 53 41 4D 45  20 D4 45 49 4C 45 52 20  |MEINSAME .EILER |
000003B0: 44 45 52 20 42 45 49 44  45 4E 20 DA 41 48 4C 45  |DER BEIDEN .AHLE|
000003C0: 4E 2E 11 22 3A 99 54 52  24 3A 8D 31 37 38 30 3A  |N..":.TR$:.1780:|
000003D0: 9E 50 41 2C 31 38 2C 31  2C 22 9C C4 45 52 20 50  |.PA,18,1,"..ER P|
000003E0: 52 41 4B 54 49 53 43 48  45 20 D2 45 43 48 45 4E  |RAKTISCHE .ECHEN|
000003F0: 56 4F 52 47 41 4E 47 20  49 53 54 20 56 49 45 4C  |VORGANG IST VIEL|
00000400: 22 00 00 1D B6 08 99 22  20 45 49 4E 46 41 43 48  |"......" EINFACH|
00000410: 45 52 2C 20 41 4C 53 20  45 53 20 49 4D 20 D4 45  |ER, ALS ES IM .E|
00000420: 58 54 20 4B 4C 49 4E 47  54 21 11 22 3A 99 54 52  |XT KLINGT!.":.TR|
00000430: 24 00 8D 1D C0 08 8D 31  37 38 30 3A 99 22 93 11  |$......1780:."..|
00000440: 11 11 11 22 54 52 24 3A  99 22 1F 11 20 D5 4E 53  |..."TR$:.".. .NS|
00000450: 45 52 45 20 DA 41 48 4C  45 4E 20 57 41 52 45 4E  |ERE .AHLEN WAREN|
00000460: 22 41 22 55 4E 44 22 42  22 9D 2E 22 3A 99 22 11  |"A"UND"B"..":.".|
00000470: 20 DA 55 45 52 53 54 20  57 49 52 44 22 42 22 44  | .UERST WIRD"B"D|
00000480: 55 52 43 48 22 41 22 47  45 54 45 49 4C 54 3A 22  |URCH"A"GETEILT:"|
00000490: 3A 9E 50 41 2C 31 30 2C  39 2C 22 1C 22 42 22 2F  |:.PA,10,9,"."B"/|
000004A0: 22 41 22 3D 22 B5 28 42  AD 41 AC 31 30 30 AA 2E  |"A"=".(B.A.100..|
000004B0: 35 29 AD 31 30 30 3A 99  22 11 22 54 52 24 00 FF  |5).100:."."TR$..|
000004C0: 1D DE 08 8D 31 37 38 30  3A 50 B2 B5 28 42 AD 41  |....1780:P..(B.A|
000004D0: 29 3A 9E 50 41 2C 31 34  2C 30 2C 22 1F 9D 22 41  |):.PA,14,0,".."A|
000004E0: 22 47 45 48 54 22 50 22  4D 41 4C 20 49 4E 22 42  |"GEHT"P"MAL IN"B|
000004F0: 22 9D 2E 20 C4 45 52 20  D2 45 53 54 20 49 53 54  |".. .ER .EST IST|
00000500: 3A 22 3A 43 B2 42 AB 50  AC 41 3A 9E 50 41 2C 31  |:":C.B.P.A:.PA,1|
00000510: 36 2C 39 2C 22 1C 22 42  22 2D 22 50 22 2A 22 41  |6,9,"."B"-"P"*"A|
00000520: 22 3D 22 43 3A 99 22 11  22 54 52 24 3A 44 B2 41  |"="C:."."TR$:D.A|
00000530: 00 6A 1E F2 08 8D 31 37  38 30 3A 81 49 B2 31 A4  |.j....1780:.I.1.|
00000540: 31 32 3A 99 3A 82 3A 9E  50 41 2C 38 2C 30 2C 22  |12:.:.:.PA,8,0,"|
00000550: 1F CE 55 4E 20 54 45 49  4C 45 4E 20 57 49 52 22  |..UN TEILEN WIR"|
00000560: 44 22 44 55 52 43 48 22  43 22 9D 3A 22 3A 9E 50  |D"DURCH"C".:":.P|
00000570: 41 2C 31 30 2C 39 2C 22  1C 22 44 22 2F 22 43 22  |A,10,9,"."D"/"C"|
00000580: 3D 22 B5 28 44 AD 43 AC  31 30 30 AA 2E 35 29 AD  |=".(D.C.100..5).|
00000590: 31 30 30 3A 99 22 11 22  54 52 24 00 E6 1E 10 09  |100:."."TR$.....|
000005A0: 8D 31 37 38 30 3A 50 B2  B5 28 44 AD 43 29 3A 9E  |.1780:P..(D.C):.|
000005B0: 50 41 2C 31 34 2C 30 2C  22 1F 9D 22 43 22 47 45  |PA,14,0,".."C"GE|
000005C0: 48 54 22 50 22 4D 41 4C  20 49 4E 22 44 22 9D 2E  |HT"P"MAL IN"D"..|
000005D0: 20 C4 45 52 20 D2 45 53  54 20 49 53 54 3A 22 3A  | .ER .EST IST:":|
000005E0: 9E 50 41 2C 31 36 2C 39  2C 22 1C 22 44 22 2D 22  |.PA,16,9,"."D"-"|
000005F0: 50 22 2A 22 43 22 3D 22  44 AB 50 AC 43 3A 99 22  |P"*"C"="D.P.C:."|
00000600: 11 22 54 52 24 3A 50 B2  44 AB 50 AC 43 3A 8B 50  |."TR$:P.D.P.C:.P|
00000610: B3 31 A7 32 33 35 30 00  F8 1E 24 09 44 B2 43 3A  |.1.2350...$.D.C:|
00000620: 43 B2 50 3A 89 32 32 39  30 00 6A 1F 2E 09 8D 31  |C.P:.2290.j....1|
00000630: 37 38 30 3A 9E 50 41 2C  32 30 2C 30 2C 22 9C C4  |780:.PA,20,0,"..|
00000640: 45 52 20 D2 45 53 54 20  49 53 54 20 30 2C 20 44  |ER .EST IST 0, D|
00000650: 45 52 20 56 4F 52 49 47  45 20 D2 45 53 54 1C 22  |ER VORIGE .EST."|
00000660: 43 22 9C 49 53 54 22 3A  99 22 41 4C 53 4F 20 44  |C".IST":."ALSO D|
00000670: 45 52 20 47 52 4F 45 53  53 54 45 20 47 45 4D 45  |ER GROESSTE GEME|
00000680: 49 4E 53 41 4D 45 20 D4  45 49 4C 45 52 2E 11 22  |INSAME .EILER.."|
00000690: 3A 99 54 52 24 3A 8B 47  56 A7 8E 00 55 20 4C 09  |:.TR$:.GV...U L.|
000006A0: 8D 31 37 38 30 3A 99 22  93 11 11 11 11 22 54 52  |.1780:."....."TR|
000006B0: 24 3A 99 22 11 1F 20 20  20 20 D7 49 52 20 48 41  |$:."..    .IR HA|
000006C0: 42 45 4E 20 47 45 46 55  4E 44 45 4E 3A 20 1C 47  |BEN GEFUNDEN: .G|
000006D0: 47 D4 20 3D 22 43 3A 54  24 B2 22 22 3A 81 49 B2  |G. ="C:T$."":.I.|
000006E0: 32 A4 C3 28 C4 28 43 29  29 3A 54 24 B2 54 24 AA  |2..(.(C)):T$.T$.|
000006F0: 22 3D 22 3A 82 3A 9E 50  41 2C 37 2C 33 30 2C 54  |"=":.:.PA,7,30,T|
00000700: 24 3A 99 22 1F 11 20 20  20 20 D0 52 4F 42 45 3A  |$:."..    .ROBE:|
00000710: 20 1C 22 41 22 2F 22 43  22 3D 22 B5 28 41 AD 43  | ."A"/"C"=".(A.C|
00000720: AA 2E 35 29 3A 9E 50 41  2C 31 31 2C 31 31 2C 42  |..5):.PA,11,11,B|
00000730: 22 2F 22 43 22 3D 22 B5  28 42 AD 43 AA 2E 35 29  |"/"C"=".(B.C..5)|
00000740: 3A 99 22 11 22 54 52 24  3A 8D 31 37 38 30 3A 8B  |:."."TR$:.1780:.|
00000750: 58 24 B3 B1 22 22 A7 9E  50 41 2C 31 35 2C 34 2C  |X$..""..PA,15,4,|
00000760: 22 9C C4 55 20 48 41 54  54 45 53 54 3A 20 20 47  |"..U HATTEST:  G|
00000770: 47 D4 20 3D 20 22 58 24  3A 99 22 11 22 54 52 24  |G. = "X$:."."TR$|
00000780: 3A 8D 31 37 38 30 00 5F  20 7E 09 89 33 32 38 30  |:.1780._ ~..3280|
00000790: 00 20 21 88 09 97 35 33  32 38 30 2C 31 34 3A 97  |. !...53280,14:.|
000007A0: 35 33 32 38 31 2C 31 34  3A 99 22 93 22 45 52 24  |53281,14:."."ER$|
000007B0: 3A 57 45 24 B2 22 31 2E  DA 41 48 4C 3A 20 22 AA  |:WE$."1..AHL: ".|
000007C0: C4 28 41 29 AA 22 20 20  20 32 2E DA 41 48 4C 3A  |.(A)."   2..AHL:|
000007D0: 22 AA C4 28 42 29 3A 9E  50 41 2C 35 2C 35 2C 22  |"..(B):.PA,5,5,"|
000007E0: 90 D7 41 53 20 49 53 54  20 44 41 53 20 4B 4C 45  |..AS IST DAS KLE|
000007F0: 49 4E 53 54 45 20 47 45  4D 45 49 4E 53 41 4D 45  |INSTE GEMEINSAME|
00000800: 22 3A 99 22 11 20 20 20  20 20 D6 49 45 4C 46 41  |":.".     .IELFA|
00000810: 43 48 45 20 56 4F 4E 22  41 22 55 4E 44 22 42 22  |CHE VON"A"UND"B"|
00000820: 3F 22 3A 9E 50 41 2C 31  33 2C 31 32 2C 22 05 4B  |?":.PA,13,12,".K|
00000830: 47 D6 20 3D 20 22 C8 28  42 4C 24 2C 32 35 29 3A  |G. = ".(BL$,25):|
00000840: 5A 5A B2 31 33 3A 58 58  B2 31 38 3A 8D 32 37 30  |ZZ.13:XX.18:.270|
00000850: 30 00 30 21 BA 09 8B 52  46 B0 4D 4E A7 32 34 34  |0.0!...RF.MN.244|
00000860: 30 00 5B 21 C4 09 58 B2  B5 28 41 AC 42 AD 43 AA  |0.[!..X..(A.B.C.|
00000870: 2E 35 29 3A 54 24 B2 22  4B 47 D6 20 22 3A 8D 33  |.5):T$."KG. ":.3|
00000880: 30 39 30 3A 8B 41 51 A7  31 38 32 30 00 19 22 CE  |090:.AQ.1820..".|
00000890: 09 97 35 33 32 38 30 2C  31 35 3A 97 35 33 32 38  |..53280,15:.5328|
000008A0: 31 2C 31 35 3A 99 22 93  22 54 52 24 3A 99 22 1F  |1,15:."."TR$:.".|
000008B0: 11 C4 41 53 20 20 D0 52  4F 44 55 4B 54 20 5A 57  |..AS  .RODUKT ZW|
000008C0: 45 49 45 52 20 DA 41 48  4C 45 4E 20 41 20 55 4E  |EIER .AHLEN A UN|
000008D0: 44 20 42 20 49 53 54 22  3A 99 22 11 47 4C 45 49  |D B IST":.".GLEI|
000008E0: 43 48 20 44 45 4D 20 D0  52 4F 44 55 4B 54 20 41  |CH DEM .RODUKT A|
000008F0: 55 53 20 44 45 52 45 4E  20 47 52 4F 45 53 53 54  |US DEREN GROESST|
00000900: 45 4D 22 3A 99 22 11 47  45 4D 45 49 4E 53 41 4D  |EM":.".GEMEINSAM|
00000910: 45 4E 20 D4 45 49 4C 45  52 20 55 4E 44 20 44 45  |EN .EILER UND DE|
00000920: 52 45 4E 20 4B 4C 45 49  4E 53 54 45 4D 22 3A 99  |REN KLEINSTEM":.|
00000930: 22 11 47 45 4D 45 49 4E  53 41 4D 45 4E 20 D6 49  |".GEMEINSAMEN .I|
00000940: 45 4C 46 41 43 48 45 4E  3A 22 00 D7 22 00 0A 9E  |ELFACHEN:".."...|
00000950: 50 41 2C 31 30 2C 39 2C  22 1C 41 20 2A 20 42 20  |PA,10,9,".A * B |
00000960: 20 3D 20 20 47 47 D4 20  2A 20 4B 47 D6 11 22 3A  | =  GG. * KG..":|
00000970: 99 54 52 24 3A 8D 31 37  38 30 3A 9E 50 41 2C 31  |.TR$:.1780:.PA,1|
00000980: 34 2C 30 2C 22 1F C4 41  52 41 55 53 20 45 52 47  |4,0,"..ARAUS ERG|
00000990: 49 42 54 20 53 49 43 48  20 46 55 45 52 20 4B 47  |IBT SICH FUER KG|
000009A0: D6 3A 22 3A 9E 50 41 2C  31 36 2C 39 2C 22 1C 4B  |.:":.PA,16,9,".K|
000009B0: 47 D6 20 20 3D 20 20 41  20 2A 20 42 20 2F 20 47  |G.  =  A * B / G|
000009C0: 47 D4 11 22 3A 99 54 52  24 3A 8D 31 37 38 30 3A  |G..":.TR$:.1780:|
000009D0: 9E 50 41 2C 32 30 2C 30  2C 22 1F D7 49 52 20 4D  |.PA,20,0,"..IR M|
000009E0: 55 45 53 53 45 4E 20 41  4C 53 4F 20 5A 55 45 52  |UESSEN ALSO ZUER|
000009F0: 53 54 20 47 47 D4 20 42  45 53 54 49 4D 4D 45 4E  |ST GG. BESTIMMEN|
00000A00: 3A 11 22 3A 99 54 52 24  00 A5 23 28 0A 47 56 B2  |:.":.TR$..#(.GV.|
00000A10: 31 3A 8D 32 32 34 30 3A  8D 31 37 38 30 3A 99 22  |1:.2240:.1780:."|
00000A20: 93 11 11 11 22 54 52 24  3A 99 22 1F 11 D7 49 52  |...."TR$:."...IR|
00000A30: 20 4B                                             | K              |
P.281,14:."."ER$:WE$."1.ZAHL: ".D(A)."  
 2.ZAHL:".D(B):.PA,5,1,".WAS IST DER GRO
ESSTE GEMEINSAME TEILER":.". VON"A"UND"B
"?":.PA,13,12,".GGT = "H(BL$,25):ZZ.13:X
X.18:.2700......RF.MN.1980.....X.C:T$."G
GT ":.3090:.AQ.1820......53280,15:.53281
,15:."......"TR$:."..DER ALTE EUKLID HAT
 HERAUSGEFUNDEN,DASS":.".MAN  DEN  GROES
STEN  GEMEINSAMEN TEILER":.".MIT HILFE E
INER KETTENDIVISION ERHAELT.":.".DESHALB
  WIRD  DIESER LOESUNGSWEG  AUCH".@.4.."
.EUKLIDISCHER ALGORITHMUS GENANNT..":.TR
$:.1780:."..."TR$:."..BEI  DIESER  KETTE
NDIVISION  WIRD  DIE":."GROESSERE ZAHL D
URCH DIE KLEINERE  GE-":."TEILT UND DER 
REST BESTIMMT. DANN WIRD"...\.."DIE KLEI
NERE ZAHL DURCH DIESEN REST GE-":."TEILT
 UND ERNEUT DER REST BESTIMMT.":."JETZT 
WIRD DER ERSTE  REST  DURCH  DEN":."ZWEI
TEN REST GETEILT  UND  WIEDER  EIN":."NE
UER REST BESTIMMT.... UND SO GEHT ES".P.
..."WEITER BIS DER REST  GLEICH 0 IST. D
ER":."REST DAVOR IST DANN DER  GROESSTE 
 GE-":."MEINSAME TEILER DER BEIDEN ZAHLE
N..":.TR$:.1780:.PA,18,1,".DER PRAKTISCH
E RECHENVORGANG IST VIEL"......" EINFACH
ER, ALS ES IM TEXT KLINGT!.":.TR$......1
780:."....."TR$:.".. UNSERE ZAHLEN WAREN
"A"UND"B"..":.". ZUERST WIRD"B"DURCH"A"G
ETEILT:":.PA,10,9,"."B"/"A"=".(B.A.100..
5).100:."."TR$......1780:P..(B.A):.PA,14
,0,".."A"GEHT"P"MAL IN"B".. DER REST IST
:":C.B.P.A:.PA,16,9,"."B"-"P"*"A"="C:.".
"TR$:D.A.J....1780:.I.1.12:.:.:.PA,8,0,"
.NUN TEILEN WIR"D"DURCH"C".:":.PA,10,9,"
."D"/"C"=".(D.C.100..5).100:."."TR$.....
.1780:P..(D.C):.PA,14,0,".."C"GEHT"P"MAL
 IN"D".. DER REST IST:":.PA,16,9,"."D"-"
P"*"C"="D.P.C:."."TR$:P.D.P.C:.P.1.2350.
..$.D.C:C.P:.2290.J....1780:.PA,20,0,".D
ER REST IST 0, DER VORIGE REST."C".IST":
."ALSO DER GROESSTE GEMEINSAME TEILER.."
:.TR$:.GV...U L..1780:."....."TR$:."..  
  WIR HABEN GEFUNDEN: .GGT ="C:T$."":.I.
2.C(D(C)):T$.T$."=":.:.PA,7,30,T$:."..  
  PROBE: ."A"/"C"=".(A.C..5):.PA,11,11,B
"/"C"=".(B.C..5):."."TR$:.1780:.X$..""..
PA,15,4,".DU HATTEST:  GGT = "X$:."."TR$
:.1780._ ~..3280. !...53280,14:.53281,14
:."."ER$:WE$."1.ZAHL: ".D(A)."   2.ZAHL:
".D(B):.PA,5,5,".WAS IST DAS KLEINSTE GE
MEINSAME":.".     VIELFACHE VON"A"UND"B"
?":.PA,13,12,".KGV = "H(BL$,25):ZZ.13:XX
.18:.2700.0!...RF.MN.2440.[!D.X..(A.B.C.
.5):T$."KGV ":.3090:.AQ.1820.."N..53280,
15:.53281,15:."."TR$:."..DAS  PRODUKT ZW
EIER ZAHLEN A UND B IST":.".GLEICH DEM P
RODUKT AUS DEREN GROESSTEM":.".GEMEINSAM
EN TEILER UND DEREN KLEINSTEM":.".GEMEIN
SAMEN VIELFACHEN:".W"...PA,10,9,".A * B 
 =  GGT * KGV.":.TR$:.1780:.PA,14,0,".DA
RAUS ERGIBT SICH FUER KGV:":.PA,16,9,".K
GV  =  A * B / GGT.":.TR$:.1780:.PA,20,0
,".WIR MUESSEN ALSO ZUERST GGT BESTIMMEN
:.":.TR$..#(.GV.1:.2240:.1780:."...."TR$
:."..WIR K
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL