MATHEMATIK 022
FILE INFORMATION
FILENAME(S): MATHEMATIK 022
FILE TYPE(S): PRG
FILE SIZE: 2.2K
FIRST SEEN: 2025-10-20 14:31:29
APPEARS ON: 1 disk(s)
FILE HASH
b470b018a6e8d07f3126c977205340ff47553f8983468423dcbe691a9ca41c03
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PD LERN | MATHEMATIK 022 | PRG | Treasure Chest - Klaus Der Suhler | 13 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 00 00 97 35 33 32 38 30 2C 33 3A 97 |..'....53280,3:.| 00000010: 35 33 32 38 31 2C 33 3A 99 C7 28 31 34 37 29 3B |53281,3:..(147);| 00000020: C7 28 31 34 32 29 3B 00 45 08 01 00 99 22 92 90 |.(142);.E...."..| 00000030: 20 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 | ###############| 00000040: 23 23 23 23 23 00 61 08 02 00 99 22 20 23 20 20 |#####.a...." # | 00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000060: 23 00 7D 08 03 00 99 22 20 23 20 4D 41 54 48 45 |#.}...." # MATHE| 00000070: 4D 41 54 49 4B 20 20 30 32 32 20 20 23 00 99 08 |MATIK 022 #...| 00000080: 04 00 99 22 20 23 20 20 20 20 20 20 20 20 20 20 |..." # | 00000090: 20 20 20 20 20 20 20 20 23 00 B5 08 05 00 99 22 | #......"| 000000A0: 20 23 20 44 49 45 53 45 53 20 50 52 4F 47 52 41 | # DIESES PROGRA| 000000B0: 4D 4D 20 20 23 00 D1 08 06 00 99 22 20 23 20 20 |MM #......" # | 000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000D0: 23 00 ED 08 07 00 99 22 20 23 20 42 45 54 52 41 |#......" # BETRA| 000000E0: 43 48 54 45 54 20 20 20 20 20 20 20 23 00 09 09 |CHTET #...| 000000F0: 08 00 99 22 20 23 20 20 20 20 20 20 20 20 20 20 |..." # | 00000100: 20 20 20 20 20 20 20 20 23 00 25 09 09 00 99 22 | #.%...."| 00000110: 20 23 20 5A 45 49 54 41 42 48 41 45 4E 47 49 47 | # ZEITABHAENGIG| 00000120: 45 20 20 20 23 00 41 09 0A 00 99 22 20 23 20 20 |E #.A...." # | 00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000140: 23 00 5D 09 0B 00 99 22 20 23 20 46 55 4E 4B 54 |#.]...." # FUNKT| 00000150: 49 4F 4E 45 4E 20 20 20 20 20 20 20 23 00 79 09 |IONEN #.y.| 00000160: 0C 00 99 22 20 23 20 20 20 20 20 20 20 20 20 20 |..." # | 00000170: 20 20 20 20 20 20 20 20 23 00 95 09 0D 00 99 22 | #......"| 00000180: 20 23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | # | 00000190: 20 20 20 20 23 00 B1 09 0E 00 99 22 20 23 20 20 | #......" # | 000001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001B0: 23 00 CD 09 0F 00 99 22 20 23 20 20 20 20 20 20 |#......" # | 000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 23 00 E9 09 | #...| 000001D0: 10 00 99 22 20 23 20 20 20 20 20 20 20 20 20 20 |..." # | 000001E0: 20 20 20 20 20 20 20 20 23 00 05 0A 11 00 99 22 | #......"| 000001F0: 20 23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | # | 00000200: 20 20 20 20 23 00 21 0A 12 00 99 22 20 23 20 20 | #.!...." # | 00000210: 50 55 42 4C 49 43 20 20 44 4F 4D 41 49 4E 20 20 |PUBLIC DOMAIN | 00000220: 23 00 3D 0A 13 00 99 22 20 23 20 20 20 20 20 20 |#.=...." # | 00000230: 20 20 20 20 20 20 20 20 20 20 20 20 23 00 59 0A | #.Y.| 00000240: 14 00 99 22 20 23 20 20 20 20 20 20 20 20 20 20 |..." # | 00000250: 20 20 20 20 20 20 20 20 23 00 75 0A 17 00 99 22 | #.u...."| 00000260: 20 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 | ###############| 00000270: 23 23 23 23 23 00 7C 0A 18 00 99 22 00 9B 0A 19 |#####.|...."....| 00000280: 00 99 22 12 42 49 54 54 45 20 54 41 53 54 45 20 |..".BITTE TASTE | 00000290: 44 52 55 45 43 4B 45 4E 92 22 3B 00 B1 0A 1A 00 |DRUECKEN.";.....| 000002A0: 92 31 39 38 2C 31 3A 97 31 39 38 2C 30 3A 99 22 |.198,1:.198,0:."| 000002B0: 93 00 C7 0A 64 00 8F 20 2A 2A 2A 20 46 4F 55 52 |....d.. *** FOUR| 000002C0: 49 45 52 20 2A 2A 2A 00 DD 0A 78 00 99 22 93 20 |IER ***...x..". | 000002D0: 20 20 20 48 49 4E 57 45 49 53 45 20 3A 00 F3 0A | HINWEISE :...| 000002E0: 82 00 99 22 20 20 20 BB BB BB BB BB BB BB BB BB |..." .........| 000002F0: BB BB BB 00 27 0B 8C 00 99 3A 99 22 44 49 45 53 |....'....:."DIES| 00000300: 45 53 20 50 52 4F 47 52 41 4D 4D 20 42 45 2D 22 |ES PROGRAMM BE-"| 00000310: 3A 99 22 54 52 41 43 48 54 45 54 20 5A 45 49 54 |:."TRACHTET ZEIT| 00000320: 41 42 48 41 45 4E 2D 00 5B 0B 96 00 99 22 47 49 |ABHAEN-.[...."GI| 00000330: 47 45 20 46 55 4E 4B 54 49 4F 4E 45 4E 2C 20 44 |GE FUNKTIONEN, D| 00000340: 49 45 22 3A 99 22 41 55 53 20 45 58 50 4F 4E 45 |IE":."AUS EXPONE| 00000350: 4E 54 49 41 4C 2D 2C 20 53 49 2D 00 9E 0B A0 00 |NTIAL-, SI-.....| 00000360: 99 22 4E 55 53 2D 20 55 4E 44 20 43 4F 53 49 4E |."NUS- UND COSIN| 00000370: 55 53 2D 41 55 53 2D 22 3A 99 22 44 52 55 45 43 |US-AUS-":."DRUEC| 00000380: 4B 45 4E 20 5A 55 53 41 4D 4D 45 4E 47 45 2D 22 |KEN ZUSAMMENGE-"| 00000390: 3A 99 22 53 45 54 5A 54 20 53 49 4E 44 2E 00 A7 |:."SETZT SIND...| 000003A0: 0B AA 00 8D 39 34 30 00 EC 0B B4 00 99 22 44 41 |....940......"DA| 000003B0: 5A 55 20 4D 55 45 53 53 45 4E 20 44 49 45 20 44 |ZU MUESSEN DIE D| 000003C0: 41 2D 22 3A 99 22 54 45 4E 20 57 49 45 20 46 4F |A-":."TEN WIE FO| 000003D0: 4C 47 54 20 45 49 4E 47 45 2D 22 3A 99 22 47 45 |LGT EINGE-":."GE| 000003E0: 42 45 4E 20 57 45 52 44 45 4E 20 3A 00 2C 0C BE |BEN WERDEN :.,..| 000003F0: 00 99 22 12 49 4E 20 5A 45 49 4C 45 20 34 35 30 |..".IN ZEILE 450| 00000400: 92 22 3A 99 22 44 41 54 41 20 4E 50 2C 4E 31 2C |.":."DATA NP,N1,| 00000410: 4E 32 2C 54 30 2C 22 3A 99 22 20 20 20 20 20 44 |N2,T0,":." D| 00000420: 45 4C 54 41 2D 54 2C 53 49 47 4D 41 00 63 0C C8 |ELTA-T,SIGMA.c..| 00000430: 00 99 22 11 4D 49 54 20 4E 50 3D 47 45 53 41 4D |..".MIT NP=GESAM| 00000440: 54 5A 41 48 4C 20 44 45 52 22 3A 99 22 5A 55 20 |TZAHL DER":."ZU | 00000450: 42 45 52 45 43 48 4E 45 4E 44 45 4E 20 50 55 4E |BERECHNENDEN PUN| 00000460: 4B 54 45 00 92 0C D2 00 99 22 4E 31 3D 41 4E 5A |KTE......"N1=ANZ| 00000470: 41 48 4C 20 44 45 52 20 45 58 50 4F 2D 22 3A 99 |AHL DER EXPO-":.| 00000480: 22 4E 45 4E 54 49 41 4C 41 55 53 44 52 55 45 43 |"NENTIALAUSDRUEC| 00000490: 4B 45 00 BA 0C DC 00 99 22 11 4E 32 3D 41 4E 5A |KE......".N2=ANZ| 000004A0: 41 48 4C 20 44 45 52 20 53 49 4E 2D 43 4F 53 2D |AHL DER SIN-COS-| 000004B0: 41 55 53 44 52 55 45 43 4B 45 00 EF 0C E6 00 99 |AUSDRUECKE......| 000004C0: 22 11 54 30 3D 5A 45 49 54 20 44 45 53 20 45 52 |".T0=ZEIT DES ER| 000004D0: 53 54 45 4E 20 5A 55 22 3A 99 22 42 45 52 45 43 |STEN ZU":."BEREC| 000004E0: 48 4E 45 4E 44 45 4E 20 50 55 4E 4B 54 45 53 00 |HNENDEN PUNKTES.| 000004F0: F8 0C F0 00 8D 39 34 30 00 36 0D FA 00 99 22 44 |.....940.6...."D| 00000500: 45 4C 54 41 2D 54 3D 5A 45 49 54 20 5A 57 49 53 |ELTA-T=ZEIT ZWIS| 00000510: 43 48 45 4E 22 3A 99 22 44 45 4E 20 5A 55 20 42 |CHEN":."DEN ZU B| 00000520: 45 52 45 43 48 4E 45 4E 44 45 4E 22 3A 99 22 50 |ERECHNENDEN":."P| 00000530: 55 4E 4B 54 45 4E 00 66 0D 04 01 99 22 11 53 49 |UNKTEN.f....".SI| 00000540: 47 4D 41 3D 53 54 41 4E 44 41 52 44 41 42 57 45 |GMA=STANDARDABWE| 00000550: 49 2D 22 3A 99 22 43 48 55 4E 47 20 28 52 41 55 |I-":."CHUNG (RAU| 00000560: 53 43 48 45 4E 29 00 8D 0D 0E 01 99 22 11 28 4B |SCHEN)......".(K| 00000570: 45 49 4E 20 52 41 55 53 43 48 45 4E 20 3A 22 3A |EIN RAUSCHEN :":| 00000580: 99 22 53 49 47 4D 41 20 3D 20 30 29 22 00 96 0D |."SIGMA = 0)"...| 00000590: 18 01 8D 39 34 30 00 C8 0D 22 01 99 22 93 44 49 |...940..."..".DI| 000005A0: 45 20 45 49 4E 5A 45 4C 4E 45 4E 20 41 55 53 2D |E EINZELNEN AUS-| 000005B0: 22 3A 99 22 44 52 55 45 43 4B 45 20 57 45 52 44 |":."DRUECKE WERD| 000005C0: 45 4E 20 41 4C 53 4F 22 00 FE 0D 2C 01 99 22 56 |EN ALSO"...,.."V| 000005D0: 4F 4E 20 44 45 52 20 46 4F 52 4D 20 3A 22 3A 99 |ON DER FORM :":.| 000005E0: 22 12 20 43 2A 45 58 50 28 2D 53 2A 54 29 20 92 |". C*EXP(-S*T) .| 000005F0: 20 42 5A 57 31 AA 43 31 29 AE 32 29 AC 51 00 08 | BZW1.C1).2).Q..| 00000600: 0E 18 01 4A B2 4A AA 4E 00 1F 0E 22 01 58 B2 28 |...J.J.N...".X.(| 00000610: 32 AD 28 31 AA 43 32 29 29 AA 28 41 AB 31 29 00 |2.(1.C2)).(A.1).| 00000620: 28 0E 2C 01 8D 35 36 30 00 42 0E 36 01 4E B2 28 |(.,..560.B.6.N.(| 00000630: 28 34 AC 44 31 29 AD 28 31 AA 43 32 29 AE 32 29 |(4.D1).(1.C2).2)| 00000640: AC 51 00 4C 0E 40 01 4A B2 4A AA 4E 00 63 0E 4A |.Q.L.@.J.J.N.c.J| 00000650: 01 58 B2 28 32 AD 28 31 AA 43 33 29 29 AA 28 41 |.X.(2.(1.C3)).(A| 00000660: AB 31 29 00 6C 0E 54 01 8D 35 36 30 00 86 0E 5E |.1).l.T..560...^| 00000670: 01 4E B2 28 28 34 AC 44 32 29 AD 28 31 AA 43 33 |.N.((4.D2).(1.C3| 00000680: 29 AE 32 29 AC 51 00 90 0E 68 01 4A B2 4A AA 4E |).2).Q...h.J.J.N| 00000690: 00 A7 0E 72 01 58 B2 28 32 AD 28 31 AA 43 34 29 |...r.X.(2.(1.C4)| 000006A0: 29 AA 28 41 AB 31 29 00 B0 0E 7C 01 8D 35 36 30 |).(A.1)...|..560| 000006B0: 00 CA 0E 86 01 4E B2 28 28 34 AC 44 32 29 AD 28 |.....N.((4.D2).(| 000006C0: 31 AA 43 34 29 AE 32 29 AC 51 00 D4 0E 90 01 4A |1.C4).2).Q.....J| 000006D0: B2 4A AA 4E 00 EB 0E 9A 01 58 B2 28 32 AD 28 31 |.J.N.....X.(2.(1| 000006E0: AA 43 35 29 29 AA 28 41 AB 31 29 00 F4 0E A4 01 |.C5)).(A.1).....| 000006F0: 8D 35 36 30 00 0E 0F AE 01 4E B2 28 28 34 AC 44 |.560.....N.((4.D| 00000700: 33 29 AD 28 31 AA 43 35 29 AE 32 29 AC 51 00 18 |3).(1.C5).2).Q..| 00000710: 0F B8 01 4A B2 4A AA 4E 00 2F 0F C2 01 58 B2 28 |...J.J.N./...X.(| 00000720: 32 AD 28 31 AA 43 36 29 29 AA 28 41 AB 31 29 00 |2.(1.C6)).(A.1).| 00000730: 38 0F CC 01 8D 35 36 30 00 52 0F D6 01 4E B2 28 |8....560.R...N.(| 00000740: 28 34 AC 44 33 29 AD 28 31 AA 43 36 29 AE 32 29 |(4.D3).(1.C6).2)| 00000750: AC 32 00 5C 0F E0 01 4A B2 4A AA 4E 00 66 0F EA |.2.\...J.J.N.f..| 00000760: 01 47 B2 4A AD 32 00 83 0F F4 01 99 3A 99 22 49 |.G.J.2......:."I| 00000770: 4E 54 45 47 52 41 4C 20 46 28 58 29 20 20 3D 22 |NTEGRAL F(X) ="| 00000780: 3A 99 47 00 C5 0F FE 01 99 22 11 11 5A 55 52 20 |:.G......"..ZUR | 00000790: 46 4F 52 54 53 45 54 5A 55 4E 47 20 45 49 4E 45 |FORTSETZUNG EINE| 000007A0: 20 31 45 49 4E 47 45 42 45 4E 2C 42 45 49 20 45 | 1EINGEBEN,BEI E| 000007B0: 49 4E 47 41 42 45 20 30 50 52 4F 47 52 41 4D 4D |INGABE 0PROGRAMM| 000007C0: 45 58 49 54 2E 00 D8 0F 08 02 A1 41 24 3A 8B 41 |EXIT.......A$:.A| 000007D0: 24 B2 22 22 A7 35 32 30 00 E8 0F 12 02 8B 41 24 |$."".520......A$| 000007E0: B2 22 31 22 A7 35 35 30 00 EE 0F 1C 02 90 00 F7 |."1".550........| 000007F0: 0F 26 02 89 32 33 30 00 FF 0F 30 02 51 B2 58 00 |.&..230...0.Q.X.| 00000800: 05 10 3A 02 8E 00 0B 10 44 02 80 00 00 00 B3 00 |..:.....D.......| 00000810: 4E 00 00 00 00 00 00 00 00 09 00 00 00 00 00 00 |N...............| 00000820: E4 10 00 00 80 00 00 00 00 00 00 00 00 20 00 00 |............. ..| 00000830: D4 FF FF 00 00 00 00 00 A0 00 00 00 00 00 00 00 |................| 00000840: EB 00 00 00 00 00 00 00 00 00 00 00 E4 10 00 00 |................| 00000850: C4 00 00 00 00 00 00 00 00 20 00 00 40 00 00 80 |......... ..@...| 00000860: F7 00 00 00 00 00 00 00 00 00 00 00 44 00 00 00 |............D...| 00000870: 80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 |................| 00000880: E4 5F FF FF FF 1B FF FF D4 FF FF 5B FF D4 FF FF |._.........[....| 00000890: FF FF FF FF FF FF FD FF FF FF FF FF FF FF FF FF |................| 000008A0: FF FF FF FF 7F FF FF FF FF 1F FF FF FF 7F FF 9F |................| 000008B0: FF FF FF FF FF FF FF FF 5B FF FF FF FF FF FF FF |........[.......| 000008C0: 54 1F FF FF 08 5B FF FF |T....[.. |
..'....53280,3:.53281,3:.G(147);G(142);.
E....".. ####################.A...." #
#.}...." # MATHEMATIK 0
22 #......" # #......"
# DIESES PROGRAMM #.Q...." #
#......" # BETRACHTET #...
..." # #.%...." # ZEITA
BHAENGIGE #.A...." #
#.]...." # FUNKTIONEN #.Y...." #
#......" #
#......" # #.M...."
# #......" #
#......" # #.!.
..." # PUBLIC DOMAIN #.=...." #
#.Y...." #
#.U...." ####################.|...."....
..".BITTE TASTE DRUECKEN.";......198,1:.
198,0:."..G.D.. *** FOURIER ***...X..".
HINWEISE :......" .............'...
.:."DIESES PROGRAMM BE-":."TRACHTET ZEIT
ABHAEN-.[...."GIGE FUNKTIONEN, DIE":."AU
S EXPONENTIAL-, SI-... .."NUS- UND COSIN
US-AUS-":."DRUECKEN ZUSAMMENGE-":."SETZT
SIND.......940......"DAZU MUESSEN DIE D
A-":."TEN WIE FOLGT EINGE-":."GEBEN WERD
EN :.,....".IN ZEILE 450.":."DATA NP,N1,
N2,T0,":." DELTA-T,SIGMA.C.H..".MIT
NP=GESAMTZAHL DER":."ZU BERECHNENDEN PUN
KTE...R.."N1=ANZAHL DER EXPO-":."NENTIAL
AUSDRUECKE......".N2=ANZAHL DER SIN-COS-
AUSDRUECKE......".T0=ZEIT DES ERSTEN ZU"
:."BERECHNENDEN PUNKTES......940.6...."D
ELTA-T=ZEIT ZWISCHEN":."DEN ZU BERECHNEN
DEN":."PUNKTEN.F....".SIGMA=STANDARDABWE
I-":."CHUNG (RAUSCHEN)......".(KEIN RAUS
CHEN :":."SIGMA = 0)"......940.H."..".DI
E EINZELNEN AUS-":."DRUECKE WERDEN ALSO"
...,.."VON DER FORM :":.". C*EXP(-S*T) .
BZW1.C1).2).Q.....J.J.N...".X.(2.(1.C2)
).(A.1).(.,..560.B.6.N.((4.D1).(1.C2).2)
.Q.L.@.J.J.N.C.J.X.(2.(1.C3)).(A.1).L.T.
.560...^.N.((4.D2).(1.C3).2).Q...H.J.J.N
...R.X.(2.(1.C4)).(A.1)...|..560.J...N.(
(4.D2).(1.C4).2).Q.T...J.J.N.....X.(2.(1
.C5)).(A.1)......560.....N.((4.D3).(1.C5
).2).Q.....J.J.N./.B.X.(2.(1.C6)).(A.1).
8.L..560.R.V.N.((4.D3).(1.C6).2).2.\...J
.J.N.F...G.J.2......:."INTEGRAL F(X) ="
:.G.E...."..ZUR FORTSETZUNG EINE 1EINGEB
EN,BEI EINGABE 0PROGRAMMEXIT..X....A$:.A
$."".520......A$."1".550.........&..230.
..0.Q.X...:.....D.......N...............
............. ..T....... ...............
........D........ ..@...............D...
................._......T..[.T..........
..............................[.......
T....[..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL