BASIC DEEL 18B
FILE INFORMATION
FILENAME(S): BASIC DEEL 18B
FILE TYPE(S): PRG
FILE SIZE: 2.6K
FIRST SEEN: 2025-12-02 02:07:08
APPEARS ON: 1 disk(s)
FILE HASH
2e76bf155ab2c499f4152bda6ee24294fe677ca480e2886bbaf674dd3081cdb8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HW 06 OXF PASCAL | BASIC DEEL 18B | PRG | Shocktrooper | 26 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 00 00 8F 20 43 48 41 4E 47 45 44 20 |..).... CHANGED | 00000010: 46 4F 52 20 43 42 4D 20 36 34 20 42 59 20 42 52 |FOR CBM 64 BY BR| 00000020: 41 4C 44 54 20 48 41 41 4B 00 48 08 01 00 8F 20 |ALDT HAAK.H.... | 00000030: 42 52 2B 20 53 4F 46 54 57 41 52 45 20 30 35 39 |BR+ SOFTWARE 059| 00000040: 32 30 2D 34 33 30 32 34 00 55 08 05 00 86 20 53 |20-43024.U.... S| 00000050: 24 28 32 35 29 00 68 08 0A 00 99 22 93 9E 22 3A |$(25).h...."..":| 00000060: 97 35 33 32 38 31 2C 36 00 86 08 14 00 99 3A 99 |.53281,6......:.| 00000070: 22 20 20 20 51 55 49 5A 5A 20 56 4F 4F 52 20 44 |" QUIZZ VOOR D| 00000080: 45 45 4C 31 38 22 00 B7 08 1E 00 99 22 11 54 59 |EEL18"......".TY| 00000090: 50 45 20 48 45 54 20 41 4E 54 57 4F 4F 52 44 2C |PE HET ANTWOORD,| 000000A0: 20 47 45 56 4F 4C 47 44 20 44 4F 4F 52 20 12 52 | GEVOLGD DOOR .R| 000000B0: 45 54 55 52 4E 92 22 00 C3 08 28 00 4E B2 30 3A |ETURN."...(.N.0:| 000000C0: 54 B2 30 00 CC 08 32 00 8D 31 30 30 00 DB 08 3C |T.0...2..100...<| 000000D0: 00 8B 20 54 B2 30 20 A7 20 35 30 00 E1 08 46 00 |.. T.0 . 50...F.| 000000E0: 99 00 0C 09 50 00 99 22 4A 45 20 48 45 42 54 22 |....P.."JE HEBT"| 000000F0: 3B 4E 3B 22 56 52 41 47 45 4E 20 46 4F 55 54 4C |;N;"VRAGEN FOUTL| 00000100: 4F 4F 53 20 47 45 4D 41 41 4B 54 22 00 33 09 5A |OOS GEMAAKT".3.Z| 00000110: 00 8B 20 4E B1 31 30 A7 99 22 47 41 20 44 4F 4F |.. N.10.."GA DOO| 00000120: 52 20 4D 45 54 20 44 45 45 4C 31 39 22 3A 99 3A |R MET DEEL19":.:| 00000130: 99 3A 80 00 5A 09 5F 00 99 22 44 4F 45 20 44 45 |.:..Z._.."DOE DE| 00000140: 45 4C 31 38 20 48 45 4C 45 4D 41 41 4C 20 4F 56 |EL18 HELEMAAL OV| 00000150: 45 52 20 22 3A 99 3A 99 3A 90 00 64 09 64 00 50 |ER ":.:.:..d.d.P| 00000160: B2 31 3A 99 00 6F 09 6E 00 87 53 24 28 50 29 00 |.1:..o.n..S$(P).| 00000170: 88 09 78 00 8B 20 53 24 28 50 29 B2 22 45 4E 44 |..x.. S$(P)."END| 00000180: 22 20 A7 54 B2 31 3A 8E 00 A4 09 82 00 8B 53 24 |" .T.1:.......S$| 00000190: 28 50 29 B3 B1 22 45 51 22 A7 50 B2 50 AA 31 3A |(P).."EQ".P.P.1:| 000001A0: 89 31 31 30 00 AC 09 8C 00 87 41 24 00 B4 09 96 |.110......A$....| 000001B0: 00 51 B2 30 00 CC 09 A0 00 81 4A B2 31 A4 50 AB |.Q.0......J.1.P.| 000001C0: 31 3A 99 53 24 28 4A 29 3A 82 20 4A 00 D4 09 AA |1:.S$(J):. J....| 000001D0: 00 85 42 24 00 E6 09 B4 00 8B 20 42 24 B2 41 24 |..B$...... B$.A$| 000001E0: 20 A7 20 32 32 30 00 0F 0A BE 00 8B 20 51 B2 30 | . 220...... Q.0| 000001F0: A7 20 51 B2 31 3A 99 22 20 50 52 4F 42 45 45 52 |. Q.1:." PROBEER| 00000200: 20 4E 4F 47 20 45 45 4E 53 22 3A 89 31 37 30 00 | NOG EENS":.170.| 00000210: 2B 0A C8 00 99 22 20 48 45 54 20 41 4E 54 57 4F |+...." HET ANTWO| 00000220: 4F 52 44 20 49 53 20 22 3B 41 24 00 42 0A D2 00 |ORD IS ";A$.B...| 00000230: 99 22 20 4E 4F 47 20 45 45 4E 53 20 22 3A 89 31 |." NOG EENS ":.1| 00000240: 37 30 00 5F 0A DC 00 99 22 20 4A 55 49 53 54 20 |70._...." JUIST | 00000250: 20 22 3A 8B 20 51 B2 30 A7 20 4E B2 4E AA 31 00 | ":. Q.0. N.N.1.| 00000260: 65 0A E6 00 8E 00 7A 0A F4 01 83 22 35 30 20 44 |e.....z...."50 D| 00000270: 49 4D 20 41 24 28 39 38 29 22 00 84 0A F9 01 83 |IM A$(98)"......| 00000280: 20 22 20 22 00 AB 0A FE 01 83 22 20 49 53 20 44 | " "......" IS D| 00000290: 49 54 20 45 45 4E 20 4A 55 49 53 54 45 20 44 45 |IT EEN JUISTE DE| 000002A0: 43 4C 41 52 41 54 49 45 20 3F 22 00 CA 0A 03 02 |CLARATIE ?".....| 000002B0: 83 22 20 41 4E 54 57 4F 4F 52 44 20 12 4A 41 92 |." ANTWOORD .JA.| 000002C0: 20 4F 46 20 12 4E 45 45 92 22 00 D3 0A 08 02 83 | OF .NEE."......| 000002D0: 20 45 51 00 DC 0A 12 02 83 20 4A 41 00 F6 0A 26 | EQ...... JA...&| 000002E0: 02 83 22 36 30 20 44 49 4D 20 42 28 35 29 2C 43 |.."60 DIM B(5),C| 000002F0: 24 28 31 30 29 22 00 00 0B 2B 02 83 20 22 20 22 |$(10)"...+.. " "| 00000300: 00 27 0B 30 02 83 22 20 49 53 20 44 49 54 20 45 |.'.0.." IS DIT E| 00000310: 45 4E 20 4A 55 49 53 54 45 20 44 45 43 4C 41 52 |EN JUISTE DECLAR| 00000320: 41 54 49 45 20 3F 22 00 46 0B 35 02 83 22 20 41 |ATIE ?".F.5.." A| 00000330: 4E 54 57 4F 4F 52 44 20 12 4A 41 92 20 4F 46 20 |NTWOORD .JA. OF | 00000340: 12 4E 45 45 92 22 00 4F 0B 3A 02 83 20 45 51 00 |.NEE.".O.:.. EQ.| 00000350: 58 0B 44 02 83 20 4A 41 00 77 0B 58 02 83 20 22 |X.D.. JA.w.X.. "| 00000360: 37 30 20 44 49 4D 20 58 28 34 30 29 2C 44 49 4D |70 DIM X(40),DIM| 00000370: 20 59 28 32 30 29 22 00 81 0B 5D 02 83 20 22 20 | Y(20)"...].. " | 00000380: 22 00 A7 0B 62 02 83 22 20 49 53 20 44 49 54 20 |"...b.." IS DIT | 00000390: 45 45 4E 20 4A 55 49 53 54 45 20 44 45 43 4C 41 |EEN JUISTE DECLA| 000003A0: 52 41 54 49 45 3F 22 00 C6 0B 67 02 83 22 20 41 |RATIE?"...g.." A| 000003B0: 4E 54 57 4F 4F 52 44 20 12 4A 41 92 20 4F 46 20 |NTWOORD .JA. OF | 000003C0: 12 4E 45 45 92 22 00 CF 0B 6C 02 83 20 45 51 00 |.NEE."...l.. EQ.| 000003D0: DA 0B 76 02 83 22 4E 45 45 22 00 FE 0B 8A 02 83 |..v.."NEE"......| 000003E0: 22 93 20 20 20 42 45 53 43 48 4F 55 57 20 44 45 |". BESCHOUW DE| 000003F0: 20 44 45 43 4C 41 52 41 54 49 45 20 20 22 00 1B | DECLARATIE "..| 00000400: 0C 94 02 83 22 20 20 20 31 30 20 44 49 4D 20 5A |...." 10 DIM Z| 00000410: 24 28 31 30 29 2C 50 28 31 31 29 00 25 0C 9E 02 |$(10),P(11).%...| 00000420: 83 20 22 20 22 00 47 0C BC 02 83 22 20 48 4F 45 |. " ".G...." HOE| 00000430: 20 48 45 45 54 20 44 45 20 45 45 52 53 54 45 20 | HEET DE EERSTE | 00000440: 41 52 52 41 59 20 22 00 51 0C C6 02 83 20 20 45 |ARRAY ".Q.... E| 00000450: 51 00 5C 0C D0 02 83 20 22 5A 24 22 00 7E 0C DA |Q.\.... "Z$".~..| 00000460: 02 83 22 20 48 4F 45 20 48 45 45 54 20 44 45 20 |.." HOE HEET DE | 00000470: 54 57 45 45 44 45 20 41 52 52 41 59 20 22 00 87 |TWEEDE ARRAY "..| 00000480: 0C E4 02 83 20 45 51 00 8F 0C EE 02 83 20 50 00 |.... EQ...... P.| 00000490: BF 0C F8 02 83 22 20 48 4F 45 56 45 45 4C 20 45 |....." HOEVEEL E| 000004A0: 4C 45 4D 45 4E 54 45 4E 20 42 45 56 41 54 20 44 |LEMENTEN BEVAT D| 000004B0: 45 20 45 45 52 53 54 45 20 41 52 52 41 59 22 00 |E EERSTE ARRAY".| 000004C0: C8 0C 02 03 83 20 45 51 00 D1 0C 0C 03 83 20 31 |..... EQ...... 1| 000004D0: 31 00 02 0D 16 03 83 20 22 20 48 4F 45 56 45 45 |1...... " HOEVEE| 000004E0: 4C 20 45 4C 45 4D 45 4E 54 45 4E 20 42 45 56 41 |L ELEMENTEN BEVA| 000004F0: 54 20 44 45 20 54 57 45 45 44 45 20 41 52 52 41 |T DE TWEEDE ARRA| 00000500: 59 22 00 0B 0D 20 03 83 20 45 51 00 14 0D 2A 03 |Y"... .. EQ...*.| 00000510: 83 20 31 32 00 41 0D 34 03 83 20 22 20 56 41 4E |. 12.A.4.. " VAN| 00000520: 20 57 45 4C 4B 20 53 4F 4F 52 54 20 49 53 20 44 | WELK SOORT IS D| 00000530: 45 20 45 45 52 53 54 45 20 41 52 52 41 59 20 20 |E EERSTE ARRAY | 00000540: 22 00 62 0D 3E 03 83 22 20 20 20 20 20 20 20 20 |".b.>.." | 00000550: 28 47 45 54 41 4C 20 4F 46 20 53 54 52 49 4E 47 |(GETAL OF STRING| 00000560: 29 22 00 6B 0D 48 03 83 20 45 51 00 7A 0D 52 03 |)".k.H.. EQ.z.R.| 00000570: 83 20 22 53 54 52 49 4E 47 22 00 A8 0D 5C 03 83 |. "STRING"...\..| 00000580: 20 22 20 45 4E 20 56 41 4E 20 57 45 4C 4B 20 53 | " EN VAN WELK S| 00000590: 4F 4F 52 54 20 49 53 20 44 45 20 54 57 45 45 44 |OORT IS DE TWEED| 000005A0: 45 20 41 52 52 41 59 22 00 B0 0D 66 03 83 45 51 |E ARRAY"...f..EQ| 000005B0: 00 BE 0D 70 03 83 20 22 47 45 54 41 4C 22 00 EA |...p.. "GETAL"..| 000005C0: 0D 84 03 83 22 20 57 41 54 20 47 45 42 45 55 52 |...." WAT GEBEUR| 000005D0: 54 20 45 52 20 41 4C 53 20 45 45 4E 20 41 52 52 |T ER ALS EEN ARR| 000005E0: 41 59 20 32 20 4D 41 41 4C 22 00 05 0E 8E 03 83 |AY 2 MAAL"......| 000005F0: 22 1D 57 4F 52 44 54 20 47 45 44 45 43 4C 41 52 |".WORDT GEDECLAR| 00000600: 45 45 52 44 22 00 0E 0E 98 03 83 22 20 22 00 3D |EERD"......" ".=| 00000610: 0E A2 03 83 22 20 41 29 20 44 45 20 43 42 4D 20 |...." A) DE CBM | 00000620: 4E 45 47 45 45 52 54 20 44 45 20 54 57 45 45 44 |NEGEERT DE TWEED| 00000630: 45 20 44 45 43 4C 41 52 41 54 49 45 22 00 68 0E |E DECLARATIE".h.| 00000640: AC 03 83 22 20 42 29 20 44 45 20 54 57 45 45 44 |..." B) DE TWEED| 00000650: 45 20 44 45 43 4C 41 52 41 54 49 45 20 56 45 52 |E DECLARATIE VER| 00000660: 56 41 4E 47 54 20 20 22 00 81 0E B6 03 83 22 20 |VANGT "......" | 00000670: 20 20 20 44 45 20 45 45 52 53 54 45 20 20 20 20 | DE EERSTE | 00000680: 22 00 A9 0E C0 03 83 22 20 43 29 20 44 45 20 43 |"......" C) DE C| 00000690: 42 4D 20 47 45 45 46 54 20 45 45 4E 20 46 4F 55 |BM GEEFT EEN FOU| 000006A0: 54 4D 45 4C 44 49 4E 47 22 00 B2 0E CA 03 83 22 |TMELDING"......"| 000006B0: 20 22 00 D1 0E D4 03 83 22 20 20 54 59 50 45 20 | "......" TYPE | 000006C0: 20 20 12 41 92 20 12 42 92 20 4F 46 20 12 43 92 | .A. .B. OF .C.| 000006D0: 22 00 DA 0E DE 03 83 20 45 51 00 E2 0E E8 03 83 |"...... EQ......| 000006E0: 20 43 00 EC 0E FC 03 83 20 22 20 22 00 0F 0F 06 | C...... " "....| 000006F0: 04 83 22 20 20 45 45 4E 20 50 52 4F 47 52 41 4D |.." EEN PROGRAM| 00000700: 4D 41 20 44 45 43 4C 41 52 45 45 52 54 3A 22 00 |MA DECLAREERT:".| 00000710: 27 0F 10 04 83 22 20 20 20 20 20 32 20 20 44 49 |'...." 2 DI| 00000720: 4D 20 41 28 37 35 29 00 30 0F 1A 04 83 22 20 22 |M A(75).0...." "| 00000730: 00 5C 0F 24 04 83 22 20 57 41 54 20 47 45 42 45 |.\.$.." WAT GEBE| 00000740: 55 52 54 20 45 52 20 41 4C 53 20 49 4E 20 48 45 |URT ER ALS IN HE| 00000750: 54 20 50 52 4F 47 52 41 4D 4D 41 22 00 7E 0F 2E |T PROGRAMMA".~..| 00000760: 04 83 22 20 41 28 31 32 33 29 20 57 4F 52 44 54 |.." A(123) WORDT| 00000770: 20 41 41 4E 47 45 52 4F 45 50 45 4E 20 22 00 87 | AANGEROEPEN "..| 00000780: 0F 38 04 83 22 20 22 00 B2 0F 42 04 83 22 20 41 |.8.." "...B.." A| 00000790: 29 20 48 45 54 20 50 52 4F 47 52 41 4D 4D 41 20 |) HET PROGRAMMA | 000007A0: 56 45 52 47 52 4F 4F 54 20 44 45 20 41 52 52 41 |VERGROOT DE ARRA| 000007B0: 59 22 00 CF 0F 4C 04 83 22 20 20 20 20 54 4F 54 |Y"...L.." TOT| 000007C0: 20 31 32 34 20 45 4C 45 4D 45 4E 54 45 4E 22 00 | 124 ELEMENTEN".| 000007D0: F8 0F 56 04 83 22 20 42 29 20 44 45 20 43 42 4D |..V.." B) DE CBM| 000007E0: 20 47 45 45 46 54 20 45 45 4E 20 46 4F 55 54 20 | GEEFT EEN FOUT | 000007F0: 4D 45 4C 44 49 4E 47 22 00 1E 10 60 04 83 22 20 |MELDING"...`.." | 00000800: 43 29 20 44 45 20 41 41 4E 52 4F 45 50 20 57 4F |C) DE AANROEP WO| 00000810: 52 44 54 20 47 45 4E 45 47 45 45 52 44 22 00 3C |RDT GENEGEERD".<| 00000820: 10 6A 04 83 20 22 20 54 59 50 45 20 20 12 41 92 |.j.. " TYPE .A.| 00000830: 20 12 42 92 20 4F 46 20 12 43 92 22 00 45 10 74 | .B. OF .C.".E.t| 00000840: 04 83 20 45 51 00 4D 10 7E 04 83 20 42 00 56 10 |.. EQ.M.~.. B.V.| 00000850: B0 04 83 22 20 22 00 80 10 BA 04 83 22 20 57 41 |..." "......" WA| 00000860: 54 20 47 45 42 45 55 52 54 20 45 52 20 41 4C 53 |T GEBEURT ER ALS| 00000870: 20 45 45 4E 20 41 52 52 41 59 52 45 41 44 59 2E | EEN ARRAYREADY.| 00000880: 00 AA 10 C4 04 83 22 20 5A 4F 4E 44 45 52 20 44 |......" ZONDER D| 00000890: 45 43 4C 41 52 41 54 49 45 20 57 4F 52 44 54 20 |ECLARATIE WORDT | 000008A0: 47 45 42 52 55 49 4B 54 20 22 00 B3 10 CE 04 83 |GEBRUIKT "......| 000008B0: 22 20 22 00 D9 10 D8 04 83 22 20 41 29 20 44 45 |" "......" A) DE| 000008C0: 20 43 42 4D 20 44 45 43 4C 41 52 45 45 52 54 20 | CBM DECLAREERT | 000008D0: 5A 45 4C 46 20 45 45 4E 22 00 FB 10 E2 04 83 22 |ZELF EEN"......"| 000008E0: 20 20 20 20 41 52 52 41 59 20 4D 45 54 20 20 31 | ARRAY MET 1| 000008F0: 31 20 45 4C 45 4D 45 4E 54 53 22 00 26 11 EC 04 |1 ELEMENTS".&...| 00000900: 83 22 20 42 29 20 44 45 20 43 42 4D 20 47 45 45 |." B) DE CBM GEE| 00000910: 46 54 20 45 45 4E 20 46 4F 55 54 4D 45 4C 44 49 |FT EEN FOUTMELDI| 00000920: 4E 47 20 20 20 22 00 50 11 F6 04 83 22 20 43 29 |NG ".P...." C)| 00000930: 20 44 45 20 43 42 4D 20 57 41 41 52 53 43 48 55 | DE CBM WAARSCHU| 00000940: 57 54 20 4A 45 20 4D 41 41 52 20 47 41 41 54 22 |WT JE MAAR GAAT"| 00000950: 00 63 11 00 05 83 22 20 20 20 20 57 45 4C 20 44 |.c...." WEL D| 00000960: 4F 4F 52 00 6C 11 0A 05 83 22 20 22 00 89 11 14 |OOR.l...." "....| 00000970: 05 83 22 20 54 59 50 45 20 20 12 41 92 20 12 42 |.." TYPE .A. .B| 00000980: 92 20 4F 46 20 12 43 92 22 00 92 11 1E 05 83 20 |. OF .C."...... | 00000990: 45 51 00 9A 11 28 05 83 20 41 00 A4 11 78 05 83 |EQ...(.. A...x..| 000009A0: 20 22 20 22 00 CC 11 82 05 83 22 20 42 45 53 43 | " "......" BESC| 000009B0: 48 4F 55 57 20 48 45 54 20 56 4F 4C 47 45 4E 44 |HOUW HET VOLGEND| 000009C0: 45 20 50 52 4F 47 52 41 4D 4D 41 22 00 D5 11 8C |E PROGRAMMA"....| 000009D0: 05 83 22 20 22 00 EA 11 96 05 83 22 20 20 20 31 |.." "......" 1| 000009E0: 30 20 44 49 4D 20 5A 28 33 29 00 04 12 A0 05 83 |0 DIM Z(3)......| 000009F0: 22 20 20 20 32 30 20 46 4F 52 20 4A 20 3D 31 20 |" 20 FOR J =1 | 00000A00: 54 4F 20 33 00 22 12 AA 05 83 22 20 20 20 33 30 |TO 3."...." 30| 00000A10: 20 5A 28 4A 29 20 3D 20 5A 28 4A 2D 31 29 20 2B | Z(J) = Z(J-1) +| 00000A20: 20 37 00 35 12 B4 05 83 22 20 20 20 34 30 20 4E | 7.5...." 40 N| 00000A30: 45 58 54 20 4A 00 4C 12 BE 05 83 22 20 20 20 35 |EXT J.L...." 5| 00000A40: 30 20 50 52 49 4E 54 20 5A 28 33 29 00 55 12 C8 |0 PRINT Z(3).U..| 00000A50: 05 83 22 20 22 00 70 12 D2 05 83 22 20 57 41 54 |.." ".p...." WAT| 00000A60: 20 57 4F 52 44 54 20 47 45 2D 50 52 49 4E 54 22 | WORDT GE-PRINT"| 00000A70: 00 78 12 DC 05 83 45 51 00 80 12 E6 05 83 32 31 |.x....EQ......21| 00000A80: 00 8A 12 0F 27 83 20 45 4E 44 00 00 00 0A 44 |....'. END....D |
..).... CHANGED FOR CBM 64 BY BRALDT HAA K.H.... BR+ SOFTWARE 05920-43024.U.... S $(25).H...."..":.53281,6......:." QUIZ Z VOOR DEEL18"......".TYPE HET ANTWOORD, GEVOLGD DOOR .RETURN.".C.(.N.0:T.0.L.2. .100...<.. T.0 . 50...F.....P.."JE HEBT" ;N;"VRAGEN FOUTLOOS GEMAAKT".3.Z.. N.10. ."GA DOOR MET DEEL19":.:.:..Z._.."DOE DE EL18 HELEMAAL OVER ":.:.:..D.D.P.1:..O.N ..S$(P)...X.. S$(P)."END" .T.1:.......S$ (P).."EQ".P.P.1:.110......A$.....Q.0.L. ..J.1.P.1:.S$(J):. J.T....B$...... B$.A$ . 220...... Q.0. Q.1:." PROBEER NOG EEN S":.170.+.H.." HET ANTWOORD IS ";A$.B.R. ." NOG EENS ":.170._...." JUIST ":. Q.0 . N.N.1.E.....Z...."50 DIM A$(98)"...... " "......" IS DIT EEN JUISTE DECLARATIE ?".J...." ANTWOORD .JA. OF .NEE.".S.... EQ...... JA...&.."60 DIM B(5),C$(10)".. .+.. " ".'.0.." IS DIT EEN JUISTE DECLAR ATIE ?".F.5.." ANTWOORD .JA. OF .NEE.".O .:.. EQ.X.D.. JA.W.X.. "70 DIM X(40),DIM Y(20)"...].. " "...B.." IS DIT EEN JUIS TE DECLARATIE?".F.G.." ANTWOORD .JA. OF .NEE.".O.L.. EQ.Z.V.."NEE"......". BES CHOUW DE DECLARATIE "......" 10 DIM Z $(10),P(11).%.... " ".G...." HOE HEET DE EERSTE ARRAY ".Q.F.. EQ.\.P.. "Z$".~.Z .." HOE HEET DE TWEEDE ARRAY "...... EQ. ..... P......" HOEVEEL ELEMENTEN BEVAT D E EERSTE ARRAY".H.... EQ.Q.... 11...... " HOEVEEL ELEMENTEN BEVAT DE TWEEDE ARRA Y"... .. EQ...*.. 12.A.4.. " VAN WELK SO ORT IS DE EERSTE ARRAY ".B.>.." (GETAL OF STRING)".K.H.. EQ.Z.R.. "STRIN G"...\.. " EN VAN WELK SOORT IS DE TWEED E ARRAY"...F..EQ...P.. "GETAL"......" WA T GEBEURT ER ALS EEN ARRAY 2 MAAL"...... ".WORDT GEDECLAREERD"......" ".=...." A) DE CBM NEGEERT DE TWEEDE DECLARATIE".H. ..." B) DE TWEEDE DECLARATIE VERVANGT " ......" DE EERSTE "......" C) DE C BM GEEFT EEN FOUTMELDING"...J.." ".Q.T.. " TYPE .A. .B. OF .C.".Z.... EQ...... C...... " "......" EEN PROGRAMMA DECLA REERT:".'...." 2 DIM A(75).0...." " .\.$.." WAT GEBEURT ER ALS IN HET PROGRA MMA".~...." A(123) WORDT AANGEROEPEN ".. .8.." "...B.." A) HET PROGRAMMA VERGROOT DE ARRAY".O.L.." TOT 124 ELEMENTEN". ..V.." B) DE CBM GEEFT EEN FOUT MELDING" ...`.." C) DE AANROEP WORDT GENEGEERD".< .J.. " TYPE .A. .B. OF .C.".E.T.. EQ.M. ~.. B.V...." "......" WAT GEBEURT ER ALS EEN ARRAYREADY....D.." ZONDER DECLARATI E WORDT GEBRUIKT "...N.." ".Y.X.." A) DE CBM DECLAREERT ZELF EEN"......" ARRA Y MET 11 ELEMENTS".&...." B) DE CBM GEE FT EEN FOUTMELDING ".P...." C) DE CBM WAARSCHUWT JE MAAR GAAT".C...." WEL D OOR.L...." "......" TYPE .A. .B. OF .C. "...... EQ...(.. A...X.. " ".L...." BESC HOUW HET VOLGENDE PROGRAMMA".U...." "... ..." 10 DIM Z(3)... .." 20 FOR J =1 TO 3."...." 30 Z(J) = Z(J-1) + 7.5.... " 40 NEXT J.L...." 50 PRINT Z(3).U.H .." ".P.R.." WAT WORDT GE-PRINT".X....EQ ......21....'. END....D
> CLICK IMAGE PREVIEW FOR FULL MODAL