WISKUNDE

FILE INFORMATION

FILENAME(S): WISKUNDE

FILE TYPE(S): PRG

FILE SIZE: 2.1K

FIRST SEEN: 2025-11-30 21:27:54

APPEARS ON: 1 disk(s)

FILE HASH

56b55f1dcdc879e61cb1f1c088ca4ca9e24889083a156c2181bb4b057132240a

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
LEERSPELLEN ALG	WISKUNDE	PRG	DuncanTwain	5	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 37 08 32 00 97 20  35 33 32 38 30 2C 31 34  |..7.2.. 53280,14|
00000010: 3A 97 20 35 33 32 38 31  2C 36 3A 99 20 C7 28 31  |:. 53281,6:. .(1|
00000020: 34 32 29 3A 97 20 35 33  32 36 39 2C 30 3A 97 20  |42):. 53269,0:. |
00000030: 35 34 32 39 36 2C 30 00  43 08 64 00 99 C7 28 31  |54296,0.C.d...(1|
00000040: 34 37 29 00 57 08 6E 00  99 A6 31 32 29 22 47 45  |47).W.n...12)"GE|
00000050: 4F 4D 45 54 52 59 22 00  5F 08 78 00 99 3A 99 00  |OMETRY"._.x..:..|
00000060: 90 08 7D 00 99 3A 99 20  22 54 59 50 45 20 12 45  |..}..:. "TYPE .E|
00000070: 92 20 46 4F 52 20 43 48  4F 49 43 45 20 54 4F 20  |. FOR CHOICE TO |
00000080: 45 4E 44 20 50 52 4F 47  52 41 4D 22 3A 99 3A 99  |END PROGRAM":.:.|
00000090: 00 BC 08 82 00 99 22 44  4F 20 59 4F 55 20 57 49  |......"DO YOU WI|
000000A0: 53 48 20 54 4F 20 43 41  4C 43 55 4C 41 54 45 20  |SH TO CALCULATE |
000000B0: 46 4F 52 20 41 20 50 4C  41 4E 45 22 00 E6 08 8C  |FOR A PLANE"....|
000000C0: 00 85 22 46 49 47 55 52  45 20 4F 52 20 46 4F 52  |.."FIGURE OR FOR|
000000D0: 20 41 20 53 4F 4C 49 44  3F 20 28 50 20 4F 52 20  | A SOLID? (P OR |
000000E0: 53 29 22 3B 43 24 00 F6  08 96 00 8B 43 24 B2 22  |S)";C$......C$."|
000000F0: 53 22 A7 37 30 30 00 06  09 A0 00 8B 43 24 B2 22  |S".700......C$."|
00000100: 50 22 A7 32 30 30 00 18  09 A5 00 8B 43 24 B2 22  |P".200......C$."|
00000110: 45 22 A7 20 32 32 30 30  00 21 09 AA 00 89 31 30  |E". 2200.!....10|
00000120: 30 00 31 09 C8 00 99 C7  28 31 34 37 29 3A 99 3A  |0.1.....(147):.:|
00000130: 99 00 46 09 D2 00 99 22  31 2E 20 52 45 43 54 41  |..F...."1. RECTA|
00000140: 4E 47 4C 45 20 22 00 59  09 DC 00 99 22 32 2E 20  |NGLE ".Y...."2. |
00000150: 54 52 49 41 4E 47 4C 45  22 00 6D 09 E6 00 99 22  |TRIANGLE".m...."|
00000160: 33 2E 20 54 52 41 50 45  5A 4F 49 44 22 00 7E 09  |3. TRAPEZOID".~.|
00000170: F0 00 99 22 34 2E 20 43  49 52 43 4C 45 22 00 86  |..."4. CIRCLE"..|
00000180: 09 FA 00 99 3A 99 00 B3  09 04 01 99 22 45 4E 54  |....:......."ENT|
00000190: 45 52 20 54 48 45 20 4F  42 4A 45 43 54 20 4F 46  |ER THE OBJECT OF|
000001A0: 20 57 48 49 43 48 20 59  4F 55 20 57 41 4E 54 20  | WHICH YOU WANT |
000001B0: 54 4F 22 00 CB 09 0E 01  85 22 46 49 4E 44 20 54  |TO"......"FIND T|
000001C0: 48 45 20 41 52 45 41 22  3B 43 32 00 DE 09 0F 01  |HE AREA";C2.....|
000001D0: 8B 43 32 B3 31 B0 43 32  B1 34 A7 32 30 30 00 EE  |.C2.1.C2.4.200..|
000001E0: 09 13 01 99 C7 28 31 34  37 29 3A 99 3A 99 00 FC  |.....(147):.:...|
000001F0: 09 18 01 8B 43 32 B2 31  A7 34 30 30 00 0A 0A 22  |....C2.1.400..."|
00000200: 01 8B 43 32 B2 32 A7 34  30 30 00 18 0A 2C 01 8B  |..C2.2.400...,..|
00000210: 43 32 B2 33 A7 35 30 30  00 26 0A 36 01 8B 43 32  |C2.3.500.&.6..C2|
00000220: B2 34 A7 36 30 30 00 48  0A 40 01 8F 27 47 4F 20  |.4.600.H.@..'GO |
00000230: 54 4F 20 53 50 45 43 49  46 49 43 20 53 55 42 52  |TO SPECIFIC SUBR|
00000240: 4F 55 54 49 4E 45 53 27  00 70 0A 90 01 99 22 45  |OUTINES'.p...."E|
00000250: 4E 54 45 52 20 54 48 45  20 4C 45 4E 47 54 48 20  |NTER THE LENGTH |
00000260: 4F 46 20 54 48 45 20 46  49 47 55 52 45 27 53 22  |OF THE FIGURE'S"|
00000270: 00 7E 0A 9A 01 85 22 42  41 53 45 22 3B 42 00 9A  |.~...."BASE";B..|
00000280: 0A A4 01 85 22 45 4E 54  45 52 20 54 48 45 20 41  |...."ENTER THE A|
00000290: 4C 54 49 54 55 44 45 22  3B 48 00 A4 0A AE 01 41  |LTITUDE";H.....A|
000002A0: B2 42 AC 48 00 D2 0A B3  01 8F 20 54 48 45 20 46  |.B.H...... THE F|
000002B0: 4F 52 4D 55 4C 41 20 46  4F 52 20 54 48 45 20 41  |ORMULA FOR THE A|
000002C0: 52 45 41 20 4F 46 20 41  20 52 45 43 54 41 4E 47  |REA OF A RECTANG|
000002D0: 4C 45 00 E0 0A B8 01 8B  43 32 B2 31 A7 34 36 30  |LE......C2.1.460|
000002E0: 00 EA 0A C2 01 41 B2 41  AD 32 00 03 0B C7 01 8F  |.....A.A.2......|
000002F0: 20 41 52 45 41 20 4F 46  20 41 20 54 52 49 41 4E  | AREA OF A TRIAN|
00000300: 47 4C 45 00 1A 0B CC 01  99 3A 99 22 54 48 45 20  |GLE......:."THE |
00000310: 41 52 45 41 20 49 53 22  3B 41 00 24 0B D6 01 89  |AREA IS";A.$....|
00000320: 32 30 30 30 00 49 0B F4  01 85 22 45 4E 54 45 52  |2000.I...."ENTER|
00000330: 20 54 48 45 20 4C 45 4E  47 54 48 20 4F 46 20 42  | THE LENGTH OF B|
00000340: 41 53 45 20 31 22 3B 42  31 00 6E 0B FE 01 85 22  |ASE 1";B1.n...."|
00000350: 45 4E 54 45 52 20 54 48  45 20 4C 45 4E 47 54 48  |ENTER THE LENGTH|
00000360: 20 4F 46 20 42 41 53 45  20 32 22 3B 42 32 00 8A  | OF BASE 2";B2..|
00000370: 0B 08 02 85 22 45 4E 54  45 52 20 54 48 45 20 41  |...."ENTER THE A|
00000380: 4C 54 49 54 55 44 45 22  3B 48 00 9E 0B 12 02 41  |LTITUDE";H.....A|
00000390: B2 28 48 AD 32 29 AC 28  42 31 AA 42 32 29 00 B8  |.(H.2).(B1.B2)..|
000003A0: 0B 17 02 8F 20 41 52 45  41 20 4F 46 20 41 20 54  |.... AREA OF A T|
000003B0: 52 41 50 45 5A 4F 49 44  00 CF 0B 1C 02 99 3A 99  |RAPEZOID......:.|
000003C0: 22 54 48 45 20 41 52 45  41 20 49 53 22 3B 41 00  |"THE AREA IS";A.|
000003D0: D9 0B 26 02 89 32 30 30  30 00 F3 0B 58 02 85 22  |..&..2000...X.."|
000003E0: 45 4E 54 45 52 20 54 48  45 20 52 41 44 49 55 53  |ENTER THE RADIUS|
000003F0: 22 3B 52 00 01 0C 62 02  41 B2 FF AC 28 52 AE 32  |";R...b.A...(R.2|
00000400: 29 00 18 0C 67 02 8F 20  41 52 45 41 20 4F 46 20  |)...g.. AREA OF |
00000410: 41 20 43 49 52 43 4C 45  00 2F 0C 6C 02 99 3A 99  |A CIRCLE./.l..:.|
00000420: 22 54 48 45 20 41 52 45  41 20 49 53 22 3B 41 00  |"THE AREA IS";A.|
00000430: 39 0C 76 02 89 32 30 30  30 00 49 0C BC 02 99 C7  |9.v..2000.I.....|
00000440: 28 31 34 37 29 3A 99 3A  99 00 65 0C C6 02 99 22  |(147):.:..e...."|
00000450: 31 2E 20 52 45 43 54 41  4E 47 55 4C 41 52 20 53  |1. RECTANGULAR S|
00000460: 4F 4C 49 44 22 00 78 0C  D0 02 99 22 32 2E 20 43  |OLID".x...."2. C|
00000470: 59 4C 49 4E 44 45 52 22  00 87 0C DA 02 99 22 33  |YLINDER"......"3|
00000480: 2E 20 43 4F 4E 45 22 00  98 0C E4 02 99 22 34 2E  |. CONE"......"4.|
00000490: 20 53 50 48 45 52 45 22  00 A0 0C EE 02 99 3A 99  | SPHERE"......:.|
000004A0: 00 BD 0C F8 02 85 22 59  4F 55 52 20 43 48 4F 49  |......"YOUR CHOI|
000004B0: 43 45 20 50 4C 45 41 53  45 22 3B 43 33 00 D0 0C  |CE PLEASE";C3...|
000004C0: FD 02 8B 43 33 B3 31 B0  43 33 B1 34 A7 37 30 30  |...C3.1.C3.4.700|
000004D0: 00 DE 0C 02 03 8B 43 33  B2 31 A7 38 32 30 00 E7  |......C3.1.820..|
000004E0: 0C 0C 03 89 39 37 30 00  F7 0C 34 03 99 C7 28 31  |....970...4...(1|
000004F0: 34 37 29 3A 99 3A 99 00  11 0D 52 03 85 22 45 4E  |47):.:....R.."EN|
00000500: 54 45 52 20 54 48 45 20  4C 45 4E 47 54 48 22 3B  |TER THE LENGTH";|
00000510: 4C 00 2A 0D 5C 03 85 22  45 4E 54 45 52 20 54 48  |L.*.\.."ENTER TH|
00000520: 45 20 57 49 44 54 48 22  3B 57 00 44 0D 66 03 85  |E WIDTH";W.D.f..|
00000530: 22 45 4E 54 45 52 20 54  48 45 20 48 45 49 47 48  |"ENTER THE HEIGH|
00000540: 54 22 3B 48 00 50 0D 70  03 56 B2 4C AC 57 AC 48  |T";H.P.p.V.L.W.H|
00000550: 00 72 0D 75 03 8F 20 56  4F 4C 55 4D 45 20 4F 46  |.r.u.. VOLUME OF|
00000560: 20 52 45 43 54 41 4E 47  55 4C 41 52 20 53 4F 4C  | RECTANGULAR SOL|
00000570: 49 44 00 8B 0D 7A 03 85  22 45 4E 54 45 52 20 54  |ID...z.."ENTER T|
00000580: 48 45 20 44 45 50 54 48  22 3B 44 00 A3 0D 84 03  |HE DEPTH";D.....|
00000590: 53 B2 28 4C AC 57 29 AA  28 57 AC 44 29 AA 28 44  |S.(L.W).(W.D).(D|
000005A0: AC 43 29 00 AD 0D 8E 03  41 B2 53 AC 32 00 CF 0D  |.C).....A.S.2...|
000005B0: 93 03 8F 20 53 55 52 46  41 43 45 20 41 52 45 41  |... SURFACE AREA|
000005C0: 20 4F 46 20 52 45 43 54  41 4E 47 55 4C 41 52 00  | OF RECTANGULAR.|
000005D0: D9 0D 98 03 89 31 35 30  30 00 FB 0D A2 03 8F 27  |.....1500......'|
000005E0: 47 4F 20 44 49 53 50 4C  41 59 20 54 48 45 20 49  |GO DISPLAY THE I|
000005F0: 4E 46 4F 52 4D 41 54 49  4F 4E 27 00 0B 0E CA 03  |NFORMATION'.....|
00000600: 99 C7 28 31 34 37 29 3A  99 3A 99 00 19 0E CF 03  |..(147):.:......|
00000610: 8B 43 33 B2 34 A7 39 39  30 00 46 0E D0 03 8F 27  |.C3.4.990.F....'|
00000620: 53 4B 49 50 20 41 53 4B  49 4E 47 20 54 48 45 20  |SKIP ASKING THE |
00000630: 41 4C 54 49 54 55 44 45  20 46 4F 52 20 41 20 53  |ALTITUDE FOR A S|
00000640: 50 48 45 52 45 27 00 62  0E D4 03 85 22 45 4E 54  |PHERE'.b...."ENT|
00000650: 45 52 20 54 48 45 20 41  4C 54 49 54 55 44 45 22  |ER THE ALTITUDE"|
00000660: 3B 48 00 7C 0E DE 03 85  22 45 4E 54 45 52 20 54  |;H.|...."ENTER T|
00000670: 48 45 20 52 41 44 49 55  53 22 3B 52 00 8B 0E E8  |HE RADIUS";R....|
00000680: 03 8B 43 33 B2 32 A7 31  30 33 30 00 9A 0E F2 03  |..C3.2.1030.....|
00000690: 8B 43 33 B2 33 A7 31 31  30 30 00 A9 0E FC 03 8B  |.C3.3.1100......|
000006A0: 43 33 B2 34 A7 31 32 30  30 00 B9 0E 06 04 56 B2  |C3.4.1200.....V.|
000006B0: FF AC 48 AC 28 52 AE 32  29 00 CD 0E 10 04 41 B2  |..H.(R.2).....A.|
000006C0: 28 32 AC FF 29 AC 52 AC  28 48 AA 52 29 00 EB 0E  |(2..).R.(H.R)...|
000006D0: 15 04 8F 20 46 4F 52 4D  55 4C 41 53 20 46 4F 52  |... FORMULAS FOR|
000006E0: 20 41 20 43 59 4C 49 4E  44 45 52 00 F5 0E 1A 04  | A CYLINDER.....|
000006F0: 89 31 35 30 30 00 16 0F  4C 04 85 22 45 4E 54 45  |.1500...L.."ENTE|
00000700: 52 20 54 48 45 20 53 4C  41 4E 54 20 48 45 49 47  |R THE SLANT HEIG|
00000710: 48 54 22 3B 53 4C 00 36  0F 51 04 8F 20 54 48 49  |HT";SL.6.Q.. THI|
00000720: 53 20 49 53 20 4E 45 45  44 45 44 20 46 4F 52 20  |S IS NEEDED FOR |
00000730: 41 20 43 4F 4E 45 00 47  0F 56 04 41 B2 FF AC 52  |A CONE.G.V.A...R|
00000740: AC 28 52 AA 53 4C 29 00  5B 0F 60 04 56 B2 28 FF  |.(R.SL).[.`.V.(.|
00000750: AD 33 29 AC 48 AC 28 52  AE 32 29 00 75 0F 65 04  |.3).H.(R.2).u.e.|
00000760: 8F 20 46 4F 52 4D 55 4C  41 53 20 46 4F 52 20 41  |. FORMULAS FOR A|
00000770: 20 43 4F 4E 45 00 7F 0F  6A 04 89 31 35 30 30 00  | CONE...j..1500.|
00000780: 8F 0F B0 04 41 B2 FF AC  34 AC 28 52 AE 32 29 00  |....A...4.(R.2).|
00000790: A3 0F BA 04 56 B2 28 FF  AD 36 29 AC 38 AC 28 52  |....V.(..6).8.(R|
000007A0: AE 33 29 00 BF 0F C4 04  8F 20 46 4F 52 4D 55 4C  |.3)...... FORMUL|
000007B0: 41 53 20 46 4F 52 20 41  20 53 50 48 45 52 45 00  |AS FOR A SPHERE.|
000007C0: C7 0F DC 05 99 3A 99 00  E4 0F E6 05 99 22 54 48  |.....:......."TH|
000007D0: 45 20 53 55 52 46 41 43  45 20 41 52 45 41 20 49  |E SURFACE AREA I|
000007E0: 53 22 3B 41 00 FB 0F F0  05 99 22 54 48 45 20 56  |S";A......"THE V|
000007F0: 4F 4C 55 4D 45 20 49 53  22 3B 56 00 03 10 D0 07  |OLUME IS";V.....|
00000800: 99 3A 99 00 3F 10 02 08  81 51 B2 31 A4 32 30 30  |.:..?....Q.1.200|
00000810: 3A 82 3A 99 22 50 52 45  53 53 20 41 4E 59 20 4B  |:.:."PRESS ANY K|
00000820: 45 59 20 54 4F 20 43 4F  4E 54 49 4E 55 45 22 3A  |EY TO CONTINUE":|
00000830: 92 20 31 39 37 2C 36 34  2C 36 34 3A A1 51 24 00  |. 197,64,64:.Q$.|
00000840: 48 10 34 08 89 31 30 30  00 69 10 98 08 97 20 35  |H.4..100.i.... 5|
00000850: 33 32 38 30 2C 31 34 3A  97 20 35 33 32 38 31 2C  |3280,14:. 53281,|
00000860: 36 3A 99 20 22 93 22 3A  80 00 00 00              |6:. ".":....    |

..7.2.. 53280,14:. 53281,6:. G(142):. 53
269,0:. 54296,0.C.D..G(147).W.N...12)"GE
OMETRY"._.X..:....}..:. "TYPE .E. FOR CH
OICE TO END PROGRAM":.:......."DO YOU WI
SH TO CALCULATE FOR A PLANE"......"FIGUR
E OR FOR A SOLID? (P OR S)";C$......C$."
S".700... ..C$."P".200......C$."E". 2200
.!....100.1.H..G(147):.:..F.R.."1. RECTA
NGLE ".Y...."2. TRIANGLE".M...."3. TRAPE
ZOID".~...."4. CIRCLE"......:......."ENT
ER THE OBJECT OF WHICH YOU WANT TO".K...
."FIND THE AREA";C2......C2.1.C2.4.200..
....G(147):.:.......C2.1.400..."..C2.2.4
00...,..C2.3.500.&.6..C2.4.600.H.@..'GO 
TO SPECIFIC SUBROUTINES'.P...."ENTER THE
 LENGTH OF THE FIGURE'S".~...."BASE";B..
...."ENTER THE ALTITUDE";H.....A.B.H.R..
.. THE FORMULA FOR THE AREA OF A RECTANG
LE......C2.1.460...B.A.A.2...G.. AREA OF
 A TRIANGLE...L..:."THE AREA IS";A.$.V..
2000.I...."ENTER THE LENGTH OF BASE 1";B
1.N...."ENTER THE LENGTH OF BASE 2";B2..
...."ENTER THE ALTITUDE";H.....A.(H.2).(
B1.B2)...... AREA OF A TRAPEZOID.O....:.
"THE AREA IS";A.Y.&..2000...X.."ENTER TH
E RADIUS";R...B.A...(R.2)...G.. AREA OF 
A CIRCLE./.L..:."THE AREA IS";A.9.V..200
0.I....G(147):.:..E.F.."1. RECTANGULAR S
OLID".X.P.."2. CYLINDER"...Z.."3. CONE".
....."4. SPHERE". ....:......."YOUR CHOI
CE PLEASE";C3.P....C3.1.C3.4.700......C3
.1.820......970...4..G(147):.:....R.."EN
TER THE LENGTH";L.*.\.."ENTER THE WIDTH"
;W.D.F.."ENTER THE HEIGHT";H.P.P.V.L.W.H
.R.U.. VOLUME OF RECTANGULAR SOLID...Z..
"ENTER THE DEPTH";D.....S.(L.W).(W.D).(D
.C).....A.S.2.O.... SURFACE AREA OF RECT
ANGULAR.Y....1500......'GO DISPLAY THE I
NFORMATION'...J..G(147):.:....O..C3.4.99
0.F.P..'SKIP ASKING THE ALTITUDE FOR A S
PHERE'.B.T.."ENTER THE ALTITUDE";H.|....
"ENTER THE RADIUS";R......C3.2.1030.....
.C3.3.1100......C3.4.1200.....V...H.(R.2
).M...A.(2..).R.(H.R)...... FORMULAS FOR
 A CYLINDER......1500...L.."ENTER THE SL
ANT HEIGHT";SL.6.Q.. THIS IS NEEDED FOR 
A CONE.G.V.A...R.(R.SL).[.`.V.(..3).H.(R
.2).U.E.. FORMULAS FOR A CONE..J..1500.
....A...4.(R.2).....V.(..6).8.(R.3)...D.
. FORMULAS FOR A SPHERE.G....:......."TH
E SURFACE AREA IS";A......"THE VOLUME IS
";V...P..:..?....Q.1.200:.:."PRESS ANY K
EY TO CONTINUE":. 197,64,64:.Q$.H.4..100
.I.... 53280,14:. 53281,6:. ".":....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL