|
DataMuseum.dkPresents historical artifacts from the history of: RegneCentralen RC700 "Piccolo" |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RegneCentralen RC700 "Piccolo" Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: 5 C K L M N O P Q R S T U V
Length: 328704 (0x50400) Description: Bits:30003065 Demoprogrammer K-Z til Pascal bog Types: 5¼" Floppy Disk, CpmFSAuto Notes: CpmFSAuto,512,2048,80,0x0,1<2,2:0-35:1
Media: [0, 0, 1] … [35, 1, 9] {128: 16, 256: 16, 512: 630} Signature: CpmFSAuto,512,2048,80,0x0,1<2,2:0-35:1 Confidence score: +92/-0 Sector size: 512 Block size: 2048 Directory entries: 80 Block number size: 8 Extent-mask: 0x00 Sector-interleave: 1, 3, 5, 7, 9, 2, 4, 6, 8 Tracks: (2, 0), (2, 1), (3, 0), (3, 1), (4, 0), (4, 1) […] (33, 0), (33, 1), (34, 0), (34, 1), (35, 0), (35, 1)
user | bc | length | name | artifact |
---|---|---|---|---|
0 | 0 | 4864 | KAEDE2.PAS | ⟦117525337⟧ TextFile |
0 | 0 | 4224 | KAEDE3.PAS | ⟦2af393daf⟧ TextFile |
0 | 0 | 5376 | KAEDE4.PAS | ⟦880fc098b⟧ TextFile |
0 | 0 | 4480 | KANNIBAL.PAS | ⟦dfc9e0488⟧ TextFile |
0 | 0 | 512 | KONTROL.PAS | ⟦a01f54c15⟧ TextFile |
0 | 0 | 5248 | LIFE.PAS | ⟦b5d387226⟧ TextFile |
0 | 0 | 1152 | LINIE.PAS | ⟦2a7b125e4⟧ TextFile |
0 | 0 | 2176 | LONGADD.PAS | ⟦806c730b3⟧ TextFile |
0 | 0 | 1920 | LONGMULT.PAS | ⟦3a076463e⟧ TextFile |
0 | 0 | 640 | MAANED2.PAS | ⟦dd3ec03f4⟧ TextFile |
0 | 0 | 1280 | MAXIMUM2.PAS | ⟦6b22462b2⟧ TextFile |
0 | 0 | 1152 | MAXPUNKT.PAS | ⟦56bd45612⟧ TextFile |
0 | 0 | 7296 | MENUFIL.PAS | ⟦0106be0fd⟧ TextFile |
0 | 0 | 2048 | MORSE1.PAS | ⟦ed999e63b⟧ TextFile |
0 | 0 | 4096 | MORSE2.PAS | ⟦fbec7c3df⟧ TextFile |
0 | 0 | 2432 | NAVNSOEG.PAS | ⟦ca742ea83⟧ TextFile |
0 | 0 | 1536 | NAVNSORT.PAS | ⟦7ede59b81⟧ TextFile |
0 | 0 | 1408 | NYGAARD.PAS | ⟦bfcb085cc⟧ TextFile |
0 | 0 | 4352 | ORDHYP.PAS | ⟦465b32bba⟧ TextFile |
0 | 0 | 3968 | OVERF_1.PAS | ⟦d9a1c3daf⟧ TextFile |
0 | 0 | 3840 | OVERF_2.PAS | ⟦26b96aa4a⟧ TextFile |
0 | 0 | 1152 | PAKKEPST.PAS | ⟦55f43dd99⟧ TextFile |
0 | 0 | 512 | PALINDR.PAS | ⟦946e561c4⟧ TextFile |
0 | 0 | 2432 | PANT.PAS | ⟦f8a816c79⟧ TextFile |
0 | 0 | 9984 | PERSONER.PAS | ⟦532e96afd⟧ TextFile |
0 | 0 | 7424 | PIP.COM | ⟦f3084c673⟧ |
0 | 0 | 1024 | POST1.PAS | ⟦7428b3c06⟧ TextFile |
0 | 0 | 6144 | POSTKOPI.PAS | ⟦057887916⟧ TextFile |
0 | 0 | 5120 | POST_ANT.PAS | ⟦23c1f8f1c⟧ TextFile |
0 | 0 | 768 | PREDEF.PAS | ⟦4c13d37ca⟧ TextFile |
0 | 0 | 896 | PRIMFORD.PAS | ⟦0430f47e0⟧ TextFile |
0 | 0 | 1152 | PRIMTAL.PAS | ⟦46b3062cb⟧ TextFile |
0 | 0 | 896 | PRINTER.PAS | ⟦7708bfcae⟧ TextFile |
0 | 0 | 384 | PRODUKT.PAS | ⟦3d7384020⟧ TextFile |
0 | 0 | 512 | PYTHAGO.PAS | ⟦9d976f48a⟧ TextFile |
0 | 0 | 2048 | QUICKSOR.PAS | ⟦bf3088372⟧ TextFile |
0 | 0 | 768 | RENTE.PAS | ⟦4ce43028e⟧ TextFile |
0 | 0 | 1408 | RENTEDAG.PAS | ⟦ce7fb40f0⟧ TextFile |
0 | 0 | 768 | RENTEFOD.PAS | ⟦ac156c345⟧ TextFile |
0 | 0 | 7168 | RING.PAS | ⟦98ad2badb⟧ TextFile |
0 | 0 | 1024 | RNDWALK.PAS | ⟦26ed308cb⟧ TextFile |
0 | 0 | 4736 | RUMF_1.PAS | ⟦0ba4242b2⟧ TextFile |
0 | 0 | 4608 | RUMF_2.PAS | ⟦7340cb7e7⟧ TextFile |
0 | 0 | 896 | SAMRENTE.PAS | ⟦906d32bd9⟧ TextFile |
0 | 0 | 2560 | SCORE.PAS | ⟦34755de22⟧ TextFile |
0 | 0 | 512 | SFD.PAS | ⟦59e8d78a5⟧ TextFile |
0 | 0 | 1280 | SIMPSON.PAS | ⟦b6bf34c6d⟧ TextFile |
0 | 0 | 768 | SKAERM.PAS | ⟦4fbb89409⟧ TextFile |
0 | 0 | 1280 | SOEG.PAS | ⟦ccc5d6ccd⟧ TextFile |
0 | 0 | 3456 | STATFIL.PAS | ⟦a43b9da65⟧ TextFile |
0 | 0 | 1024 | STATISTI.PAS | ⟦f5ae3197f⟧ TextFile |
0 | 0 | 1280 | SUMBROEK.PAS | ⟦2d65e5cb8⟧ TextFile |
0 | 0 | 640 | TABEL.PAS | ⟦efddb9119⟧ TextFile |
0 | 0 | 512 | TALFOELG.PAS | ⟦fd7b94cd3⟧ TextFile |
0 | 0 | 640 | TEGN.PAS | ⟦031193df4⟧ TextFile |
0 | 0 | 1024 | TERNING2.PAS | ⟦7574ae04e⟧ TextFile |
0 | 0 | 1920 | TRECIFRE.PAS | ⟦075514987⟧ TextFile |
0 | 0 | 896 | TREGRUP.PAS | ⟦d02c615f9⟧ TextFile |
0 | 0 | 1536 | TREKANT.PAS | ⟦072c15507⟧ TextFile |
0 | 0 | 640 | TRIGONOM.PAS | ⟦b7ba7c347⟧ TextFile |
0 | 0 | 640 | UD6.PAS | ⟦1df54152d⟧ TextFile |
0 | 0 | 3200 | UGELOEN.PAS | ⟦9876b7570⟧ TextFile |
0 | 0 | 768 | UPCASE.PAS | ⟦cf816e6a4⟧ TextFile |
0 | 0 | 10752 | VAREFIL.PAS | ⟦e362882e1⟧ TextFile |
0 | 0 | 1920 | VAREPOST.PAS | ⟦102079053⟧ TextFile |
0 | 0 | 1024 | VARER1.PAS | ⟦064569ced⟧ TextFile |
0 | 0 | 640 | VARER2.PAS | ⟦d37c8822b⟧ TextFile |
0 | 0 | 2304 | VOKALER.PAS | ⟦71974c1fb⟧ TextFile |
0x00000…00020 (0, 0, 1) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x1df…] 0x03c00…03c20 (2, 0, 1) [0, 'KONTROL.PAS', 0, 4, 'xl=00', 'bc=00', 'xh=00', 'rc=04', '0-0-0-0-0-0-0-0-0-0-0', [2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03c20…03c40 [0, 'KANNIBAL.PAS', 0, 35, 'xl=00', 'bc=00', 'xh=00', 'rc=23', '0-0-0-0-0-0-0-0-0-0-0', [3, 4, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03c40…03c60 [0, 'KAEDE3.PAS', 0, 33, 'xl=00', 'bc=00', 'xh=00', 'rc=21', '0-0-0-0-0-0-0-0-0-0-0', [6, 7, 8, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03c60…03c80 [0, 'KAEDE4.PAS', 0, 42, 'xl=00', 'bc=00', 'xh=00', 'rc=2a', '0-0-0-0-0-0-0-0-0-0-0', [9, 10, 11, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03c80…03ca0 [0, 'KAEDE2.PAS', 0, 38, 'xl=00', 'bc=00', 'xh=00', 'rc=26', '0-0-0-0-0-0-0-0-0-0-0', [12, 13, 14, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03ca0…03cc0 [0, 'LIFE.PAS', 0, 41, 'xl=00', 'bc=00', 'xh=00', 'rc=29', '0-0-0-0-0-0-0-0-0-0-0', [15, 16, 17, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03cc0…03ce0 [0, 'LONGADD.PAS', 0, 17, 'xl=00', 'bc=00', 'xh=00', 'rc=11', '0-0-0-0-0-0-0-0-0-0-0', [18, 19, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03ce0…03d00 [0, 'LONGMULT.PAS', 0, 15, 'xl=00', 'bc=00', 'xh=00', 'rc=0f', '0-0-0-0-0-0-0-0-0-0-0', [20, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03d00…03d20 [0, 'LINIE.PAS', 0, 9, 'xl=00', 'bc=00', 'xh=00', 'rc=09', '0-0-0-0-0-0-0-0-0-0-0', [21, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03d20…03d40 [0, 'MAANED2.PAS', 0, 5, 'xl=00', 'bc=00', 'xh=00', 'rc=05', '0-0-0-0-0-0-0-0-0-0-0', [22, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03d40…03d60 [0, 'MORSE1.PAS', 0, 16, 'xl=00', 'bc=00', 'xh=00', 'rc=10', '0-0-0-0-0-0-0-0-0-0-0', [23, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03d60…03d80 [0, 'MAXIMUM2.PAS', 0, 10, 'xl=00', 'bc=00', 'xh=00', 'rc=0a', '0-0-0-0-0-0-0-0-0-0-0', [24, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03d80…03da0 [0, 'MORSE2.PAS', 0, 32, 'xl=00', 'bc=00', 'xh=00', 'rc=20', '0-0-0-0-0-0-0-0-0-0-0', [25, 26, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03da0…03dc0 [0, 'MAXPUNKT.PAS', 0, 9, 'xl=00', 'bc=00', 'xh=00', 'rc=09', '0-0-0-0-0-0-0-0-0-0-0', [27, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03dc0…03de0 [0, 'MENUFIL.PAS', 0, 57, 'xl=00', 'bc=00', 'xh=00', 'rc=39', '0-0-0-0-0-0-0-0-0-0-0', [28, 29, 30, 31, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03de0…03e00 [0, 'NYGAARD.PAS', 0, 11, 'xl=00', 'bc=00', 'xh=00', 'rc=0b', '0-0-0-0-0-0-0-0-0-0-0', [32, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03e00…03e20 (2, 0, 2) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x04000…04020 (2, 0, 3) [0, 'NAVNSORT.PAS', 0, 12, 'xl=00', 'bc=00', 'xh=00', 'rc=0c', '0-0-0-0-0-0-0-0-0-0-0', [33, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04020…04040 [0, 'NAVNSOEG.PAS', 0, 19, 'xl=00', 'bc=00', 'xh=00', 'rc=13', '0-0-0-0-0-0-0-0-0-0-0', [34, 35, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04040…04060 [0, 'OVERF_1.PAS', 0, 31, 'xl=00', 'bc=00', 'xh=00', 'rc=1f', '0-0-0-0-0-0-0-0-0-0-0', [36, 37, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04060…04080 [0, 'OVERF_2.PAS', 0, 30, 'xl=00', 'bc=00', 'xh=00', 'rc=1e', '0-0-0-0-0-0-0-0-0-0-0', [38, 39, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04080…040a0 [0, 'ORDHYP.PAS', 0, 34, 'xl=00', 'bc=00', 'xh=00', 'rc=22', '0-0-0-0-0-0-0-0-0-0-0', [40, 41, 42, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x040a0…040c0 [0, 'PIP.COM', 0, 58, 'xl=00', 'bc=00', 'xh=00', 'rc=3a', '0-0-0-0-0-0-0-0-0-0-0', [43, 44, 45, 46, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x040c0…040e0 [0, 'PRINTER.PAS', 0, 7, 'xl=00', 'bc=00', 'xh=00', 'rc=07', '0-0-0-0-0-0-0-0-0-0-0', [47, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x040e0…04100 [0, 'POST1.PAS', 0, 8, 'xl=00', 'bc=00', 'xh=00', 'rc=08', '0-0-0-0-0-0-0-0-0-0-0', [48, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04100…04120 [0, 'PAKKEPST.PAS', 0, 9, 'xl=00', 'bc=00', 'xh=00', 'rc=09', '0-0-0-0-0-0-0-0-0-0-0', [49, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04120…04140 [0, 'PRODUKT.PAS', 0, 3, 'xl=00', 'bc=00', 'xh=00', 'rc=03', '0-0-0-0-0-0-0-0-0-0-0', [50, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04140…04160 [0, 'PYTHAGO.PAS', 0, 4, 'xl=00', 'bc=00', 'xh=00', 'rc=04', '0-0-0-0-0-0-0-0-0-0-0', [51, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04160…04180 [0, 'PRIMTAL.PAS', 0, 9, 'xl=00', 'bc=00', 'xh=00', 'rc=09', '0-0-0-0-0-0-0-0-0-0-0', [52, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04180…041a0 [0, 'PANT.PAS', 0, 19, 'xl=00', 'bc=00', 'xh=00', 'rc=13', '0-0-0-0-0-0-0-0-0-0-0', [53, 54, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x041a0…041c0 [0, 'PREDEF.PAS', 0, 6, 'xl=00', 'bc=00', 'xh=00', 'rc=06', '0-0-0-0-0-0-0-0-0-0-0', [55, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x041c0…041e0 [0, 'PALINDR.PAS', 0, 4, 'xl=00', 'bc=00', 'xh=00', 'rc=04', '0-0-0-0-0-0-0-0-0-0-0', [56, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x041e0…04200 [0, 'POST_ANT.PAS', 0, 40, 'xl=00', 'bc=00', 'xh=00', 'rc=28', '0-0-0-0-0-0-0-0-0-0-0', [57, 58, 59, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04200…04220 (2, 0, 4) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x04400…04420 (2, 0, 5) [0, 'POSTKOPI.PAS', 0, 48, 'xl=00', 'bc=00', 'xh=00', 'rc=30', '0-0-0-0-0-0-0-0-0-0-0', [60, 61, 62, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04420…04440 [0, 'PRIMFORD.PAS', 0, 7, 'xl=00', 'bc=00', 'xh=00', 'rc=07', '0-0-0-0-0-0-0-0-0-0-0', [63, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04440…04460 [0, 'PERSONER.PAS', 0, 78, 'xl=00', 'bc=00', 'xh=00', 'rc=4e', '0-0-0-0-0-0-0-0-0-0-0', [64, 65, 66, 67, 68, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04460…04480 [0, 'QUICKSOR.PAS', 0, 16, 'xl=00', 'bc=00', 'xh=00', 'rc=10', '0-0-0-0-0-0-0-0-0-0-0', [69, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04480…044a0 [0, 'RENTE.PAS', 0, 6, 'xl=00', 'bc=00', 'xh=00', 'rc=06', '0-0-0-0-0-0-0-0-0-0-0', [70, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x044a0…044c0 [0, 'RENTEFOD.PAS', 0, 6, 'xl=00', 'bc=00', 'xh=00', 'rc=06', '0-0-0-0-0-0-0-0-0-0-0', [71, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x044c0…044e0 [0, 'RNDWALK.PAS', 0, 8, 'xl=00', 'bc=00', 'xh=00', 'rc=08', '0-0-0-0-0-0-0-0-0-0-0', [72, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x044e0…04500 [0, 'RUMF_1.PAS', 0, 37, 'xl=00', 'bc=00', 'xh=00', 'rc=25', '0-0-0-0-0-0-0-0-0-0-0', [73, 74, 75, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04500…04520 [0, 'RUMF_2.PAS', 0, 36, 'xl=00', 'bc=00', 'xh=00', 'rc=24', '0-0-0-0-0-0-0-0-0-0-0', [76, 77, 78, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04520…04540 [0, 'RING.PAS', 0, 56, 'xl=00', 'bc=00', 'xh=00', 'rc=38', '0-0-0-0-0-0-0-0-0-0-0', [79, 80, 81, 82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04540…04560 [0, 'RENTEDAG.PAS', 0, 11, 'xl=00', 'bc=00', 'xh=00', 'rc=0b', '0-0-0-0-0-0-0-0-0-0-0', [83, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04560…04580 [0, 'SAMRENTE.PAS', 0, 7, 'xl=00', 'bc=00', 'xh=00', 'rc=07', '0-0-0-0-0-0-0-0-0-0-0', [84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04580…045a0 [0, 'SKAERM.PAS', 0, 6, 'xl=00', 'bc=00', 'xh=00', 'rc=06', '0-0-0-0-0-0-0-0-0-0-0', [85, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x045a0…045c0 [0, 'STATISTI.PAS', 0, 8, 'xl=00', 'bc=00', 'xh=00', 'rc=08', '0-0-0-0-0-0-0-0-0-0-0', [86, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x045c0…045e0 [0, 'SOEG.PAS', 0, 10, 'xl=00', 'bc=00', 'xh=00', 'rc=0a', '0-0-0-0-0-0-0-0-0-0-0', [87, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x045e0…04600 [0, 'SUMBROEK.PAS', 0, 10, 'xl=00', 'bc=00', 'xh=00', 'rc=0a', '0-0-0-0-0-0-0-0-0-0-0', [88, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04600…04620 (2, 0, 6) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x04800…04820 (2, 0, 7) [0, 'SFD.PAS', 0, 4, 'xl=00', 'bc=00', 'xh=00', 'rc=04', '0-0-0-0-0-0-0-0-0-0-0', [89, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04820…04840 [0, 'SIMPSON.PAS', 0, 10, 'xl=00', 'bc=00', 'xh=00', 'rc=0a', '0-0-0-0-0-0-0-0-0-0-0', [90, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04840…04860 [0, 'STATFIL.PAS', 0, 27, 'xl=00', 'bc=00', 'xh=00', 'rc=1b', '0-0-0-0-0-0-0-0-0-0-0', [91, 92, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04860…04880 [0, 'SCORE.PAS', 0, 20, 'xl=00', 'bc=00', 'xh=00', 'rc=14', '0-0-0-0-0-0-0-0-0-0-0', [93, 94, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04880…048a0 [0, 'TEGN.PAS', 0, 5, 'xl=00', 'bc=00', 'xh=00', 'rc=05', '0-0-0-0-0-0-0-0-0-0-0', [95, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x048a0…048c0 [0, 'TRIGONOM.PAS', 0, 5, 'xl=00', 'bc=00', 'xh=00', 'rc=05', '0-0-0-0-0-0-0-0-0-0-0', [96, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x048c0…048e0 [0, 'TABEL.PAS', 0, 5, 'xl=00', 'bc=00', 'xh=00', 'rc=05', '0-0-0-0-0-0-0-0-0-0-0', [97, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x048e0…04900 [0, 'TALFOELG.PAS', 0, 4, 'xl=00', 'bc=00', 'xh=00', 'rc=04', '0-0-0-0-0-0-0-0-0-0-0', [98, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04900…04920 [0, 'TREGRUP.PAS', 0, 7, 'xl=00', 'bc=00', 'xh=00', 'rc=07', '0-0-0-0-0-0-0-0-0-0-0', [99, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04920…04940 [0, 'TERNING2.PAS', 0, 8, 'xl=00', 'bc=00', 'xh=00', 'rc=08', '0-0-0-0-0-0-0-0-0-0-0', [100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04940…04960 [0, 'TRECIFRE.PAS', 0, 15, 'xl=00', 'bc=00', 'xh=00', 'rc=0f', '0-0-0-0-0-0-0-0-0-0-0', [101, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04960…04980 [0, 'TREKANT.PAS', 0, 12, 'xl=00', 'bc=00', 'xh=00', 'rc=0c', '0-0-0-0-0-0-0-0-0-0-0', [102, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04980…049a0 [0, 'UGELOEN.PAS', 0, 25, 'xl=00', 'bc=00', 'xh=00', 'rc=19', '0-0-0-0-0-0-0-0-0-0-0', [103, 104, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x049a0…049c0 [0, 'UD6.PAS', 0, 5, 'xl=00', 'bc=00', 'xh=00', 'rc=05', '0-0-0-0-0-0-0-0-0-0-0', [105, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x049c0…049e0 [0, 'UPCASE.PAS', 0, 6, 'xl=00', 'bc=00', 'xh=00', 'rc=06', '0-0-0-0-0-0-0-0-0-0-0', [106, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x049e0…04a00 [0, 'VARER1.PAS', 0, 8, 'xl=00', 'bc=00', 'xh=00', 'rc=08', '0-0-0-0-0-0-0-0-0-0-0', [107, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04a00…04c00 (2, 0, 8) DataBlock {»KONTROL.PAS«} 0x04c00…04c20 (2, 0, 9) [0, 'VARER2.PAS', 0, 5, 'xl=00', 'bc=00', 'xh=00', 'rc=05', '0-0-0-0-0-0-0-0-0-0-0', [108, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04c20…04c40 [0, 'VAREPOST.PAS', 0, 15, 'xl=00', 'bc=00', 'xh=00', 'rc=0f', '0-0-0-0-0-0-0-0-0-0-0', [109, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04c40…04c60 [0, 'VOKALER.PAS', 0, 18, 'xl=00', 'bc=00', 'xh=00', 'rc=12', '0-0-0-0-0-0-0-0-0-0-0', [110, 111, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04c60…04c80 [0, 'VAREFIL.PAS', 0, 84, 'xl=00', 'bc=00', 'xh=00', 'rc=54', '0-0-0-0-0-0-0-0-0-0-0', [112, 113, 114, 115, 116, 117, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04c80…04ca0 Dirent {Status=0xe5} […0xb…] 0x04e00…04e20 (2, 1, 1) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x05000…05200 (2, 1, 2) DataBlock {»KANNIBAL.PAS«} 0x05200…05220 (2, 1, 3) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x05400…05600 (2, 1, 4) DataBlock {»KANNIBAL.PAS«} 0x05600…05620 (2, 1, 5) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x05800…05a00 (2, 1, 6) DataBlock {»KANNIBAL.PAS«} […0x4…] 0x06200…06220 (3, 0, 2) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x06400…06600 (3, 0, 3) DataBlock {»KANNIBAL.PAS«} 0x06600…06800 (3, 0, 4) DataBlock {»KAEDE3.PAS«} 0x06800…06980 (3, 0, 5) DataBlock {»KANNIBAL.PAS«} 0x06980…069a0 20 20 20 20 20 20 20 20 45 4c 53 45 20 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE ┆ 0x069a0…069c0 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 4f 52 20 ┆ BEGIN FOR ┆ 0x069c0…069e0 69 20 3a 3d 20 31 20 54 4f 20 61 6e 74 61 6c 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆i := 1 TO antal DO ┆ 0x069e0…06a00 20 20 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BEGIN ┆ 0x06a00…06c00 (3, 0, 6) DataBlock {»KAEDE3.PAS«} 0x06c00…06c20 (3, 0, 7) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x06e00…07000 (3, 0, 8) DataBlock {»KAEDE3.PAS«} 0x07000…07020 (3, 0, 9) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x07200…07400 (3, 1, 1) DataBlock {»KAEDE3.PAS«} […0x1…] 0x07480…074a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 70 5e 2e 6e 61 65 73 74 65 20 3a ┆ pp^.naeste :┆ 0x074a0…074c0 3d 20 4e 49 4c 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆= NIL; ┆ 0x074c0…074e0 20 20 20 20 20 69 6e 64 73 61 65 74 28 74 6f 70 2c 20 70 70 29 3b 0d 0a 20 20 20 20 20 20 20 20 ┆ indsaet(top, pp); ┆ 0x074e0…07500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 20 20 20 ┆ END; ┆ 0x07500…07520 20 20 20 20 20 20 20 20 20 27 46 27 2c 20 27 66 27 20 3a 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 ┆ 'F', 'f' : BEGIN ┆ 0x07520…07540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 52 49 54 45 4c 4e 3b ┆ WRITELN;┆ 0x07540…07560 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 ┆ W┆ 0x07560…07580 52 49 54 45 28 27 48 76 65 6d 20 73 6b 61 6c 20 66 6a 65 72 6e 65 73 3a 20 27 29 3b 0d 0a 20 20 ┆RITE('Hvem skal fjernes: '); ┆ 0x07580…075a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 4c ┆ READL┆ 0x075a0…075c0 4e 28 75 64 5e 2e 6e 61 76 6e 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆N(ud^.navn); ┆ 0x075c0…075e0 20 20 20 20 20 20 20 20 20 20 20 66 6a 65 72 6e 28 74 6f 70 2c 20 75 64 29 3b 0d 0a 20 20 20 20 ┆ fjern(top, ud); ┆ 0x075e0…07600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 ┆ END; ┆ 0x07600…07800 (3, 1, 3) DataBlock {»KAEDE3.PAS«} 0x07800…07820 (3, 1, 4) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x07a00…07c00 (3, 1, 5) DataBlock {»KAEDE3.PAS«} 0x07c00…07c20 (3, 1, 6) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x07e00…08000 (3, 1, 7) DataBlock {»KAEDE3.PAS«} 0x08000…08020 (3, 1, 8) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x08200…08400 (3, 1, 9) DataBlock {»KAEDE3.PAS«} 0x08400…08600 (4, 0, 1) DataBlock {»KAEDE4.PAS«} […0x9…] 0x09800…09a00 (4, 1, 2) DataBlock {»KAEDE2.PAS«} 0x09a00…09b00 (4, 1, 3) DataBlock {»KAEDE4.PAS«} 0x09b00…09b20 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x7…] 0x09c00…09e00 (4, 1, 4) DataBlock {»KAEDE2.PAS«} 0x09e00…09e20 (4, 1, 5) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x0a000…0a200 (4, 1, 6) DataBlock {»KAEDE2.PAS«} […0x4…] 0x0aa00…0aa20 (5, 0, 2) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x0ac00…0ae00 (5, 0, 3) DataBlock {»KAEDE2.PAS«} 0x0ae00…0b000 (5, 0, 4) DataBlock {»LIFE.PAS«} 0x0b000…0b200 (5, 0, 5) DataBlock {»KAEDE2.PAS«} 0x0b200…0b400 (5, 0, 6) DataBlock {»LIFE.PAS«} 0x0b400…0b500 (5, 0, 7) DataBlock {»KAEDE2.PAS«} 0x0b500…0b520 61 65 73 74 65 20 3a 3d 20 4e 49 4c 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆aeste := NIL; ┆ 0x0b520…0b540 20 20 20 20 20 20 20 20 20 20 20 20 69 6e 64 73 61 65 74 28 74 6f 70 2c 20 70 70 29 3b 0d 0a 20 ┆ indsaet(top, pp); ┆ 0x0b540…0b560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a ┆ END; ┆ 0x0b560…0b580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 46 27 2c 20 27 66 27 20 3a 20 42 45 47 49 4e ┆ 'F', 'f' : BEGIN┆ 0x0b580…0b5a0 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 ┆ W┆ 0x0b5a0…0b5c0 52 49 54 45 4c 4e 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RITELN; ┆ 0x0b5c0…0b5e0 20 20 20 20 20 20 57 52 49 54 45 28 27 48 76 65 6d 20 73 6b 61 6c 20 66 6a 65 72 6e 65 73 3a 20 ┆ WRITE('Hvem skal fjernes: ┆ 0x0b5e0…0b600 27 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'); ┆ 0x0b600…0b800 (5, 0, 8) DataBlock {»LIFE.PAS«} 0x0b800…0b820 (5, 0, 9) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x0ba00…0bc00 (5, 1, 1) DataBlock {»LIFE.PAS«} […0x5…] 0x0c480…0c4a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xb…] 0x0c600…0c800 (5, 1, 7) DataBlock {»LIFE.PAS«} 0x0c800…0c820 (5, 1, 8) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x0ca00…0cc00 (5, 1, 9) DataBlock {»LIFE.PAS«} 0x0cc00…0ce00 (6, 0, 1) DataBlock {»LONGADD.PAS«} 0x0ce00…0ce20 (6, 0, 2) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x0d000…0d200 (6, 0, 3) DataBlock {»LONGADD.PAS«} 0x0d200…0d220 (6, 0, 4) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x0d400…0d600 (6, 0, 5) DataBlock {»LONGADD.PAS«} 0x0d600…0d620 (6, 0, 6) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x0d800…0da00 (6, 0, 7) DataBlock {»LONGADD.PAS«} 0x0da00…0dc00 (6, 0, 8) DataBlock {»LONGMULT.PAS«} 0x0dc00…0dc80 (6, 0, 9) DataBlock {»LONGADD.PAS«} 0x0dc80…0dca0 20 20 20 6d 65 6e 74 65 20 3a 3d 20 73 75 6d 20 44 49 56 20 31 30 3b 0d 0a 20 20 20 20 20 20 20 ┆ mente := sum DIV 10; ┆ 0x0dca0…0dcc0 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 76 33 28 2e 30 2e 29 ┆ END; v3(.0.)┆ 0x0dcc0…0dce0 20 3a 3d 20 6d 65 6e 74 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 46 4f 52 20 69 20 3a 3d ┆ := mente; FOR i :=┆ 0x0dce0…0dd00 20 31 20 54 4f 20 39 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 52 49 54 45 28 ┆ 1 TO 9 DO WRITE(┆ 0x0dd00…0dd20 27 20 27 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 6a 20 3a 3d 20 30 3b 0d 0a 20 20 20 20 ┆' '); j := 0; ┆ 0x0dd20…0dd40 20 20 20 20 20 20 20 20 57 48 49 4c 45 20 28 76 33 28 2e 6a 2e 29 20 3d 20 30 29 20 41 4e 44 20 ┆ WHILE (v3(.j.) = 0) AND ┆ 0x0dd40…0dd60 28 6a 20 3c 20 6d 61 78 6c 61 65 6e 67 64 65 29 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 20 20 20 ┆(j < maxlaengde) DO ┆ 0x0dd60…0dd80 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 52 49 54 45 28 ┆ BEGIN WRITE(┆ 0x0dd80…0dda0 27 20 27 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6a 20 3a 3d 20 6a 20 2b 20 ┆' '); j := j + ┆ 0x0dda0…0ddc0 31 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 20 20 20 20 ┆1; END; ┆ 0x0ddc0…0dde0 20 20 20 20 46 4f 52 20 69 20 3a 3d 20 6a 20 54 4f 20 6d 61 78 6c 61 65 6e 67 64 65 20 44 4f 0d ┆ FOR i := j TO maxlaengde DO ┆ 0x0dde0…0de00 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 52 49 54 45 28 76 33 28 2e 69 2e 29 29 3b 0d 0a ┆ WRITE(v3(.i.)); ┆ 0x0de00…0e000 (6, 1, 1) DataBlock {»LONGMULT.PAS«} 0x0e000…0e080 (6, 1, 2) DataBlock {»LINIE.PAS«} 0x0e080…0e0a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xb…] 0x0e200…0e400 (6, 1, 3) DataBlock {»LONGMULT.PAS«} 0x0e400…0e420 (6, 1, 4) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x0e600…0e780 (6, 1, 5) DataBlock {»LONGMULT.PAS«} 0x0e780…0e7a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x3…] 0x0e800…0ea00 (6, 1, 6) DataBlock {»MAANED2.PAS«} 0x0ea00…0ec00 (6, 1, 7) DataBlock {»LINIE.PAS«} 0x0ec00…0ec80 (6, 1, 8) DataBlock {»MAANED2.PAS«} 0x0ec80…0eca0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xb…] 0x0ee00…0f000 (6, 1, 9) DataBlock {»LINIE.PAS«} 0x0f000…0f020 (7, 0, 1) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x0f200…0f400 (7, 0, 2) DataBlock {»MORSE1.PAS«} 0x0f400…0f420 (7, 0, 3) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x0f600…0f800 (7, 0, 4) DataBlock {»MAXIMUM2.PAS«} 0x0f800…0fa00 (7, 0, 5) DataBlock {»MORSE1.PAS«} 0x0fa00…0fc00 (7, 0, 6) DataBlock {»MAXIMUM2.PAS«} 0x0fc00…0fe00 (7, 0, 7) DataBlock {»MORSE1.PAS«} 0x0fe00…0ff00 (7, 0, 8) DataBlock {»MAXIMUM2.PAS«} 0x0ff00…0ff20 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x7…] 0x10000…10200 (7, 0, 9) DataBlock {»MORSE1.PAS«} 0x10200…10220 (7, 1, 1) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x10400…10600 (7, 1, 2) DataBlock {»MORSE2.PAS«} […0x7…] 0x11400…11600 (8, 0, 1) DataBlock {»MAXPUNKT.PAS«} 0x11600…11800 (8, 0, 2) DataBlock {»MENUFIL.PAS«} 0x11800…11a00 (8, 0, 3) DataBlock {»MAXPUNKT.PAS«} 0x11a00…11c00 (8, 0, 4) DataBlock {»MENUFIL.PAS«} 0x11c00…11c80 (8, 0, 5) DataBlock {»MAXPUNKT.PAS«} 0x11c80…11ca0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xb…] 0x11e00…12000 (8, 0, 6) DataBlock {»MENUFIL.PAS«} 0x12000…12020 (8, 0, 7) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x12200…12400 (8, 0, 8) DataBlock {»MENUFIL.PAS«} […0xb…] 0x13880…138a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x2b…] 0x13e00…14000 (9, 0, 4) DataBlock {»NAVNSORT.PAS«} 0x14000…14200 (9, 0, 5) DataBlock {»NYGAARD.PAS«} 0x14200…14400 (9, 0, 6) DataBlock {»NAVNSORT.PAS«} 0x14400…14600 (9, 0, 7) DataBlock {»NYGAARD.PAS«} 0x14600…14800 (9, 0, 8) DataBlock {»NAVNSORT.PAS«} 0x14800…14980 (9, 0, 9) DataBlock {»NYGAARD.PAS«} 0x14980…149a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x13…] 0x14c00…14d80 (9, 1, 2) DataBlock {»NAVNSOEG.PAS«} 0x14d80…14da0 20 20 20 20 54 48 45 4e 20 66 75 6e 64 65 74 20 3a 3d 20 54 52 55 45 0d 0a 20 20 20 20 20 20 20 ┆ THEN fundet := TRUE ┆ 0x14da0…14dc0 20 45 4c 53 45 20 66 75 6e 64 65 74 20 3a 3d 20 46 41 4c 53 45 3b 0d 0a 20 20 20 20 45 4e 44 3b ┆ ELSE fundet := FALSE; END;┆ 0x14dc0…14de0 20 28 2a 20 66 75 6e 64 65 74 20 2a 29 0d 0a 20 20 0d 0a 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 ┆ (* fundet *) BEGIN ┆ 0x14de0…14e00 69 6e 64 6c 61 65 73 28 6b 61 72 74 6f 74 65 6b 2c 20 61 6e 74 61 6c 29 3b 0d 0a 20 20 20 20 73 ┆indlaes(kartotek, antal); s┆ 0x14e00…15000 (9, 1, 3) DataBlock {»NAVNSOEG.PAS«} 0x15000…15020 (9, 1, 4) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x15200…15400 (9, 1, 5) DataBlock {»NAVNSOEG.PAS«} 0x15400…15420 (9, 1, 6) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x15600…15800 (9, 1, 7) DataBlock {»NAVNSOEG.PAS«} 0x15800…15820 (9, 1, 8) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x15a00…15c00 (9, 1, 9) DataBlock {»NAVNSOEG.PAS«} 0x15c00…15e00 (10, 0, 1) DataBlock {»OVERF_1.PAS«} […0x5…] 0x16780…167a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x3…] 0x16800…16a00 (10, 0, 7) DataBlock {»OVERF_1.PAS«} 0x16a00…16c00 (10, 0, 8) DataBlock {»OVERF_2.PAS«} 0x16c00…16e00 (10, 0, 9) DataBlock {»OVERF_1.PAS«} 0x16e00…17000 (10, 1, 1) DataBlock {»OVERF_2.PAS«} […0x3…] 0x17500…17520 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x7…] 0x17600…17800 (10, 1, 5) DataBlock {»OVERF_2.PAS«} 0x17800…17a00 (10, 1, 6) DataBlock {»ORDHYP.PAS«} 0x17a00…17c00 (10, 1, 7) DataBlock {»OVERF_2.PAS«} 0x17c00…17e00 (10, 1, 8) DataBlock {»ORDHYP.PAS«} 0x17e00…18000 (10, 1, 9) DataBlock {»OVERF_2.PAS«} 0x18000…18200 (11, 0, 1) DataBlock {»ORDHYP.PAS«} […0x3…] 0x18700…18720 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 52 45 53 45 54 28 69 6e 64 66 69 6c 29 3b 0d 0a 20 20 ┆ RESET(indfil); ┆ 0x18720…18740 20 20 20 20 20 20 20 20 20 20 57 48 49 4c 45 20 4e 4f 54 20 45 4f 46 28 69 6e 64 66 69 6c 29 20 ┆ WHILE NOT EOF(indfil) ┆ 0x18740…18760 44 4f 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 ┆DO BEGIN ┆ 0x18760…18780 20 20 20 20 20 20 20 20 20 6c 61 65 73 6f 72 64 28 6e 61 65 73 74 65 6f 72 64 29 3b 0d 0a 20 20 ┆ laesord(naesteord); ┆ 0x18780…187a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4e 4f 54 20 45 4f 46 28 69 6e 64 66 69 6c 29 ┆ IF NOT EOF(indfil)┆ 0x187a0…187c0 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 48 45 4e 20 67 65 6d 6f 72 64 28 ┆ THEN gemord(┆ 0x187c0…187e0 6f 72 64 74 72 61 65 2c 20 6e 61 65 73 74 65 6f 72 64 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 ┆ordtrae, naesteord); ┆ 0x187e0…18800 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 43 4c 4f 53 45 28 69 6e 64 66 ┆ END; CLOSE(indf┆ 0x18800…18a00 (11, 0, 5) DataBlock {»ORDHYP.PAS«} 0x18a00…18a20 (11, 0, 6) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x18c00…18e00 (11, 0, 7) DataBlock {»ORDHYP.PAS«} 0x18e00…18e20 (11, 0, 8) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x19000…19200 (11, 0, 9) DataBlock {»ORDHYP.PAS«} 0x19200…19220 (11, 1, 1) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x19400…19600 (11, 1, 2) DataBlock {»PIP.COM«} […0xb…] 0x1ab00…1ab20 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x7…] 0x1ac00…1ae00 (12, 0, 5) DataBlock {»PIP.COM«} 0x1ae00…1ae20 (12, 0, 6) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x1b000…1b200 (12, 0, 7) DataBlock {»PIP.COM«} 0x1b200…1b400 (12, 0, 8) DataBlock {»PRINTER.PAS«} 0x1b400…1b600 (12, 0, 9) DataBlock {»PIP.COM«} 0x1b600…1b780 (12, 1, 1) DataBlock {»PRINTER.PAS«} 0x1b780…1b7a0 29 3b 0d 0a 20 20 20 20 57 52 49 54 45 4c 4e 28 4c 53 54 29 3b 0d 0a 20 20 20 20 57 52 49 54 45 ┆); WRITELN(LST); WRITE┆ 0x1b7a0…1b7c0 4c 4e 28 4c 53 54 2c 20 27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆LN(LST, ' ┆ 0x1b7c0…1b7e0 20 45 6e 20 67 72 75 6e 64 6c 7b 67 67 65 6e 64 65 20 69 6e 64 66 7c 72 69 6e 67 20 69 27 29 3b ┆ En grundlæggende indføring i');┆ 0x1b7e0…1b800 0d 0a 20 20 20 20 57 52 49 54 45 4c 4e 28 4c 53 54 2c 20 27 20 20 20 20 20 20 20 20 20 20 20 20 ┆ WRITELN(LST, ' ┆ 0x1b800…1b820 (12, 1, 2) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x3f…] 0x1c000…1c200 (12, 1, 6) DataBlock {»PAKKEPST.PAS«} 0x1c200…1c400 (12, 1, 7) DataBlock {»POST1.PAS«} 0x1c400…1c600 (12, 1, 8) DataBlock {»PAKKEPST.PAS«} 0x1c600…1c800 (12, 1, 9) DataBlock {»POST1.PAS«} 0x1c800…1c880 (13, 0, 1) DataBlock {»PAKKEPST.PAS«} 0x1c880…1c8a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x2b…] 0x1ce00…1d000 (13, 0, 4) DataBlock {»PYTHAGO.PAS«} 0x1d000…1d180 (13, 0, 5) DataBlock {»PRODUKT.PAS«} 0x1d180…1d1a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x53…] 0x1dc00…1de00 (13, 1, 2) DataBlock {»PANT.PAS«} 0x1de00…1e000 (13, 1, 3) DataBlock {»PRIMTAL.PAS«} 0x1e000…1e200 (13, 1, 4) DataBlock {»PANT.PAS«} 0x1e200…1e400 (13, 1, 5) DataBlock {»PRIMTAL.PAS«} 0x1e400…1e600 (13, 1, 6) DataBlock {»PANT.PAS«} 0x1e600…1e680 (13, 1, 7) DataBlock {»PRIMTAL.PAS«} 0x1e680…1e6a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xb…] 0x1e800…1ea00 (13, 1, 8) DataBlock {»PANT.PAS«} 0x1ea00…1ea20 (13, 1, 9) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x1ec00…1ed80 (14, 0, 1) DataBlock {»PANT.PAS«} 0x1ed80…1eda0 3d 20 27 4a 55 4e 27 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 45 4e 44 0d 0a 20 20 20 20 20 20 20 ┆= 'JUN'; END ┆ 0x1eda0…1edc0 20 45 4c 53 45 0d 0a 20 20 20 20 20 20 20 20 20 20 6d 61 61 6e 65 64 20 3a 3d 20 27 44 45 43 27 ┆ ELSE maaned := 'DEC'┆ 0x1edc0…1ede0 3b 0d 0a 20 20 20 20 20 20 57 52 49 54 45 28 6d 61 61 6e 65 64 20 3a 20 31 31 2c 20 61 61 72 20 ┆; WRITE(maaned : 11, aar ┆ 0x1ede0…1ee00 3a 20 35 29 3b 0d 0a 20 20 20 20 20 20 72 65 6e 74 65 20 3a 3d 20 49 4e 54 28 72 65 73 74 20 2a ┆: 5); rente := INT(rest *┆ 0x1ee00…1ef00 (14, 0, 2) DataBlock {»PREDEF.PAS«} 0x1ef00…1ef20 20 20 49 46 20 43 4c 52 45 4f 4c 20 3d 20 27 27 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ IF CLREOL = '' ┆ 0x1ef20…1ef40 54 48 45 4e 20 57 52 49 54 45 4c 4e 28 27 41 4b 27 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN WRITELN('AK') ┆ 0x1ef40…1ef60 20 20 45 4c 53 45 20 57 52 49 54 45 4c 4e 28 27 4f 4b 27 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 ┆ ELSE WRITELN('OK'); ┆ 0x1ef60…1ef80 20 20 20 49 46 20 49 4e 53 4c 49 4e 20 3d 20 27 27 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ IF INSLIN = '' ┆ 0x1ef80…1efa0 20 54 48 45 4e 20 57 52 49 54 45 4c 4e 28 27 41 4b 27 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 ┆ THEN WRITELN('AK') ┆ 0x1efa0…1efc0 20 20 20 45 4c 53 45 20 57 52 49 54 45 4c 4e 28 27 4f 4b 27 29 3b 0d 0a 20 20 20 20 20 20 20 20 ┆ ELSE WRITELN('OK'); ┆ 0x1efc0…1efe0 20 20 20 20 49 46 20 44 45 4c 4c 49 4e 20 3d 20 27 27 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆ IF DELLIN = '' ┆ 0x1efe0…1f000 20 20 54 48 45 4e 20 57 52 49 54 45 4c 4e 28 27 41 4b 27 29 0d 0a 20 20 20 20 20 20 20 20 20 20 ┆ THEN WRITELN('AK') ┆ 0x1f000…1f020 (14, 0, 3) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x4f…] 0x1fa00…1fc00 (14, 0, 8) DataBlock {»PALINDR.PAS«} 0x1fc00…1fe00 (14, 0, 9) DataBlock {»PREDEF.PAS«} 0x1fe00…1fe20 (14, 1, 1) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x20000…20200 (14, 1, 2) DataBlock {»POST_ANT.PAS«} 0x20200…20220 (14, 1, 3) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x20400…20600 (14, 1, 4) DataBlock {»POST_ANT.PAS«} 0x20600…20620 (14, 1, 5) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x20800…20a00 (14, 1, 6) DataBlock {»POST_ANT.PAS«} […0x4…] 0x21200…21220 (15, 0, 2) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x21400…21600 (15, 0, 3) DataBlock {»POST_ANT.PAS«} 0x21600…21800 (15, 0, 4) DataBlock {»POSTKOPI.PAS«} 0x21800…21a00 (15, 0, 5) DataBlock {»POST_ANT.PAS«} 0x21a00…21c00 (15, 0, 6) DataBlock {»POSTKOPI.PAS«} 0x21c00…21e00 (15, 0, 7) DataBlock {»POST_ANT.PAS«} 0x21e00…22000 (15, 0, 8) DataBlock {»POSTKOPI.PAS«} 0x22000…22020 (15, 0, 9) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x22200…22400 (15, 1, 1) DataBlock {»POSTKOPI.PAS«} […0x8…] 0x23400…23600 (16, 0, 1) DataBlock {»PRIMFORD.PAS«} 0x23600…23800 (16, 0, 2) DataBlock {»PERSONER.PAS«} 0x23800…23980 (16, 0, 3) DataBlock {»PRIMFORD.PAS«} 0x23980…239a0 69 6d 20 3a 3d 20 70 72 69 6d 74 61 6c 3b 0d 0a 20 20 20 20 20 20 49 46 20 6e 20 3d 20 31 0d 0a ┆im := primtal; IF n = 1 ┆ 0x239a0…239c0 20 20 20 20 20 20 20 20 54 48 45 4e 20 70 72 69 6d 20 3a 3d 20 46 41 4c 53 45 3b 0d 0a 20 20 20 ┆ THEN prim := FALSE; ┆ 0x239c0…239e0 20 45 4e 44 3b 0d 0a 20 20 20 20 0d 0a 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 57 52 49 54 45 28 ┆ END; BEGIN WRITE(┆ 0x239e0…23a00 43 4c 52 48 4f 4d 29 3b 0d 0a 20 20 20 20 57 52 49 54 45 28 27 54 61 73 74 20 61 6e 74 61 6c 3a ┆CLRHOM); WRITE('Tast antal:┆ 0x23a00…23c00 (16, 0, 4) DataBlock {»PERSONER.PAS«} 0x23c00…23c20 (16, 0, 5) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x23e00…24000 (16, 0, 6) DataBlock {»PERSONER.PAS«} 0x24000…24020 (16, 0, 7) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x24200…24400 (16, 0, 8) DataBlock {»PERSONER.PAS«} […0xc…] 0x25b00…25b20 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x7…] 0x25c00…25e00 (17, 0, 3) DataBlock {»PERSONER.PAS«} 0x25e00…26000 (17, 0, 4) DataBlock {»QUICKSOR.PAS«} 0x26000…26200 (17, 0, 5) DataBlock {»PERSONER.PAS«} 0x26200…26400 (17, 0, 6) DataBlock {»QUICKSOR.PAS«} 0x26400…26600 (17, 0, 7) DataBlock {»PERSONER.PAS«} 0x26600…26800 (17, 0, 8) DataBlock {»QUICKSOR.PAS«} 0x26800…26a00 (17, 0, 9) DataBlock {»PERSONER.PAS«} 0x26a00…26c00 (17, 1, 1) DataBlock {»QUICKSOR.PAS«} 0x26c00…26e00 (17, 1, 2) DataBlock {»RENTEFOD.PAS«} 0x26e00…27000 (17, 1, 3) DataBlock {»RENTE.PAS«} 0x27000…27100 (17, 1, 4) DataBlock {»RENTEFOD.PAS«} 0x27100…27120 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x7…] 0x27200…27300 (17, 1, 5) DataBlock {»RENTE.PAS«} 0x27300…27320 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x47…] 0x27c00…27e00 (18, 0, 1) DataBlock {»RNDWALK.PAS«} 0x27e00…28000 (18, 0, 2) DataBlock {»RUMF_1.PAS«} 0x28000…28200 (18, 0, 3) DataBlock {»RNDWALK.PAS«} 0x28200…28400 (18, 0, 4) DataBlock {»RUMF_1.PAS«} 0x28400…28420 (18, 0, 5) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x28600…28800 (18, 0, 6) DataBlock {»RUMF_1.PAS«} 0x28800…28820 (18, 0, 7) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x28a00…28c00 (18, 0, 8) DataBlock {»RUMF_1.PAS«} […0x2…] 0x29000…29020 (18, 1, 2) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x29200…29400 (18, 1, 3) DataBlock {»RUMF_1.PAS«} 0x29400…29420 (18, 1, 4) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x29600…29800 (18, 1, 5) DataBlock {»RUMF_1.PAS«} 0x29800…29a00 (18, 1, 6) DataBlock {»RUMF_2.PAS«} 0x29a00…29c00 (18, 1, 7) DataBlock {»RUMF_1.PAS«} 0x29c00…29e00 (18, 1, 8) DataBlock {»RUMF_2.PAS«} 0x29e00…29e80 (18, 1, 9) DataBlock {»RUMF_1.PAS«} 0x29e80…29ea0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xb…] 0x2a000…2a200 (19, 0, 1) DataBlock {»RUMF_2.PAS«} […0x4…] 0x2aa00…2aa20 (19, 0, 6) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x2ac00…2ae00 (19, 0, 7) DataBlock {»RUMF_2.PAS«} 0x2ae00…2ae20 (19, 0, 8) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x2b000…2b200 (19, 0, 9) DataBlock {»RUMF_2.PAS«} 0x2b200…2b220 (19, 1, 1) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x2b400…2b600 (19, 1, 2) DataBlock {»RING.PAS«} […0xa…] 0x2ca00…2ca20 (20, 0, 4) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x2cc00…2ce00 (20, 0, 5) DataBlock {»RING.PAS«} 0x2ce00…2ce20 (20, 0, 6) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x2d000…2d200 (20, 0, 7) DataBlock {»RING.PAS«} 0x2d200…2d400 (20, 0, 8) DataBlock {»RENTEDAG.PAS«} 0x2d400…2d600 (20, 0, 9) DataBlock {»RING.PAS«} 0x2d600…2d800 (20, 1, 1) DataBlock {»RENTEDAG.PAS«} 0x2d800…2d820 (20, 1, 2) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x2da00…2db80 (20, 1, 3) DataBlock {»RENTEDAG.PAS«} 0x2db80…2dba0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x23…] 0x2e000…2e200 (20, 1, 6) DataBlock {»SKAERM.PAS«} 0x2e200…2e400 (20, 1, 7) DataBlock {»SAMRENTE.PAS«} 0x2e400…2e500 (20, 1, 8) DataBlock {»SKAERM.PAS«} 0x2e500…2e520 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x7…] 0x2e600…2e780 (20, 1, 9) DataBlock {»SAMRENTE.PAS«} 0x2e780…2e7a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x33…] 0x2ee00…2f000 (21, 0, 4) DataBlock {»SOEG.PAS«} 0x2f000…2f200 (21, 0, 5) DataBlock {»STATISTI.PAS«} 0x2f200…2f400 (21, 0, 6) DataBlock {»SOEG.PAS«} 0x2f400…2f600 (21, 0, 7) DataBlock {»STATISTI.PAS«} 0x2f600…2f700 (21, 0, 8) DataBlock {»SOEG.PAS«} 0x2f700…2f720 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x27…] 0x2fc00…2fe00 (21, 1, 2) DataBlock {»SFD.PAS«} 0x2fe00…30000 (21, 1, 3) DataBlock {»SUMBROEK.PAS«} 0x30000…30020 (21, 1, 4) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x30200…30400 (21, 1, 5) DataBlock {»SUMBROEK.PAS«} 0x30400…30420 (21, 1, 6) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x30600…30700 (21, 1, 7) DataBlock {»SUMBROEK.PAS«} 0x30700…30720 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x27…] 0x30c00…30e00 (22, 0, 1) DataBlock {»SIMPSON.PAS«} 0x30e00…31000 (22, 0, 2) DataBlock {»STATFIL.PAS«} 0x31000…31200 (22, 0, 3) DataBlock {»SIMPSON.PAS«} 0x31200…31400 (22, 0, 4) DataBlock {»STATFIL.PAS«} 0x31400…31500 (22, 0, 5) DataBlock {»SIMPSON.PAS«} 0x31500…31520 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x7…] 0x31600…31800 (22, 0, 6) DataBlock {»STATFIL.PAS«} 0x31800…31820 (22, 0, 7) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x31a00…31c00 (22, 0, 8) DataBlock {»STATFIL.PAS«} […0x2…] 0x32000…32200 (22, 1, 2) DataBlock {»SCORE.PAS«} 0x32200…32380 (22, 1, 3) DataBlock {»STATFIL.PAS«} 0x32380…323a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x3…] 0x32400…32600 (22, 1, 4) DataBlock {»SCORE.PAS«} 0x32600…32620 (22, 1, 5) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x32800…32a00 (22, 1, 6) DataBlock {»SCORE.PAS«} […0x1…] 0x32c00…32c20 (22, 1, 8) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x32e00…33000 (22, 1, 9) DataBlock {»SCORE.PAS«} 0x33000…33020 (23, 0, 1) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x2f…] 0x33600…33800 (23, 0, 4) DataBlock {»TRIGONOM.PAS«} 0x33800…33a00 (23, 0, 5) DataBlock {»TEGN.PAS«} 0x33a00…33a80 (23, 0, 6) DataBlock {»TRIGONOM.PAS«} 0x33a80…33aa0 53 49 4e 55 53 2c 20 53 49 4e 55 53 20 6f 67 20 54 41 4e 47 45 4e 53 27 29 3b 0d 0a 20 20 20 20 ┆SINUS, SINUS og TANGENS'); ┆ 0x33aa0…33ac0 57 52 49 54 45 4c 4e 28 27 74 69 6c 20 65 74 20 76 69 6c 6b 7d 72 6c 69 67 74 20 69 6e 64 74 61 ┆WRITELN('til et vilkårligt indta┆ 0x33ac0…33ae0 73 74 65 74 20 67 72 61 64 74 61 6c 27 29 3b 0d 0a 20 20 20 20 57 52 49 54 45 4c 4e 3b 0d 0a 20 ┆stet gradtal'); WRITELN; ┆ 0x33ae0…33b00 20 20 20 57 52 49 54 45 28 27 49 6e 64 74 61 73 74 20 47 52 41 44 74 61 6c 3a 20 27 29 3b 20 52 ┆ WRITE('Indtast GRADtal: '); R┆ 0x33b00…33b20 45 41 44 4c 4e 28 67 72 61 64 74 61 6c 29 3b 0d 0a 20 20 20 20 72 61 64 69 61 6e 74 61 6c 20 3a ┆EADLN(gradtal); radiantal :┆ 0x33b20…33b40 3d 20 67 72 61 64 74 61 6c 20 2a 20 50 49 20 2f 20 31 38 30 3b 0d 0a 20 20 20 20 57 52 49 54 45 ┆= gradtal * PI / 180; WRITE┆ 0x33b40…33b60 4c 4e 3b 0d 0a 20 20 20 20 57 52 49 54 45 4c 4e 28 27 43 4f 53 28 27 2c 20 67 72 61 64 74 61 6c ┆LN; WRITELN('COS(', gradtal┆ 0x33b60…33b80 20 3a 20 36 20 3a 20 32 2c 20 27 29 3d 20 27 2c 20 43 4f 53 28 72 61 64 69 61 6e 74 61 6c 29 20 ┆ : 6 : 2, ')= ', COS(radiantal) ┆ 0x33b80…33ba0 3a 20 37 20 3a 20 34 29 3b 0d 0a 20 20 20 20 57 52 49 54 45 4c 4e 28 27 53 49 4e 28 27 2c 20 67 ┆: 7 : 4); WRITELN('SIN(', g┆ 0x33ba0…33bc0 72 61 64 74 61 6c 20 3a 20 36 20 3a 20 32 2c 20 27 29 3d 20 27 2c 20 53 49 4e 28 72 61 64 69 61 ┆radtal : 6 : 2, ')= ', SIN(radia┆ 0x33bc0…33be0 6e 74 61 6c 29 20 3a 20 37 20 3a 20 34 29 3b 0d 0a 20 20 20 20 57 52 49 54 45 4c 4e 28 27 54 41 ┆ntal) : 7 : 4); WRITELN('TA┆ 0x33be0…33c00 4e 28 27 2c 20 67 72 61 64 74 61 6c 20 3a 20 36 20 3a 20 32 2c 20 27 29 3d 20 27 2c 20 0d 0a 20 ┆N(', gradtal : 6 : 2, ')= ', ┆ 0x33c00…33c80 (23, 0, 7) DataBlock {»TEGN.PAS«} 0x33c80…33ca0 20 20 20 20 53 53 20 20 20 20 20 20 20 20 20 20 43 43 20 20 20 20 20 20 20 20 20 20 20 41 41 41 ┆ SS CC AAA┆ 0x33ca0…33cc0 41 20 20 20 20 20 20 4c 4c 27 29 3b 0d 0a 20 20 57 52 49 54 45 4c 4e 28 27 50 50 20 20 20 50 50 ┆A LL'); WRITELN('PP PP┆ 0x33cc0…33ce0 20 20 20 20 41 41 20 20 41 41 20 20 20 20 20 53 53 20 20 20 20 20 20 20 20 20 20 43 43 20 20 20 ┆ AA AA SS CC ┆ 0x33ce0…33d00 20 20 20 20 20 20 20 41 41 20 20 41 41 20 20 20 20 20 4c 4c 27 29 3b 0d 0a 20 20 57 52 49 54 45 ┆ AA AA LL'); WRITE┆ 0x33d00…33d20 4c 4e 28 27 50 50 50 50 50 50 20 20 20 20 41 41 20 20 20 20 41 41 20 20 20 20 53 53 53 53 53 53 ┆LN('PPPPPP AA AA SSSSSS┆ 0x33d20…33d40 53 53 20 20 20 20 43 43 20 20 20 20 20 20 20 20 20 41 41 20 20 20 20 41 41 20 20 20 20 4c 4c 27 ┆SS CC AA AA LL'┆ 0x33d40…33d60 29 3b 0d 0a 20 20 57 52 49 54 45 4c 4e 28 27 50 50 20 20 20 20 20 20 20 20 41 41 41 41 41 41 41 ┆); WRITELN('PP AAAAAAA┆ 0x33d60…33d80 41 20 20 20 20 20 20 20 20 20 20 53 53 20 20 20 20 43 43 20 20 20 20 20 20 20 20 20 41 41 41 41 ┆A SS CC AAAA┆ 0x33d80…33da0 41 41 41 41 20 20 20 20 4c 4c 27 29 3b 0d 0a 20 20 57 52 49 54 45 4c 4e 28 27 50 50 20 20 20 20 ┆AAAA LL'); WRITELN('PP ┆ 0x33da0…33dc0 20 20 20 41 41 20 20 20 20 20 20 41 41 20 20 20 20 20 20 20 20 20 53 53 20 20 20 20 43 43 20 20 ┆ AA AA SS CC ┆ 0x33dc0…33de0 20 20 20 20 20 20 41 41 20 20 20 20 20 20 41 41 20 20 20 4c 4c 27 29 3b 0d 0a 20 20 57 52 49 54 ┆ AA AA LL'); WRIT┆ 0x33de0…33e00 45 4c 4e 28 27 50 50 20 20 20 20 20 20 20 41 41 20 20 20 20 20 20 41 41 20 20 20 53 53 53 53 53 ┆ELN('PP AA AA SSSSS┆ 0x33e00…33e20 (23, 0, 8) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x2f…] 0x34400…34600 (23, 1, 2) DataBlock {»TALFOELG.PAS«} 0x34600…34800 (23, 1, 3) DataBlock {»TABEL.PAS«} 0x34800…34820 (23, 1, 4) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x34a00…34a80 (23, 1, 5) DataBlock {»TABEL.PAS«} 0x34a80…34aa0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x4b…] 0x35400…35600 (24, 0, 1) DataBlock {»TREGRUP.PAS«} 0x35600…35800 (24, 0, 2) DataBlock {»TERNING2.PAS«} 0x35800…35980 (24, 0, 3) DataBlock {»TREGRUP.PAS«} 0x35980…359a0 20 20 20 20 73 74 72 65 6e 67 32 20 3a 3d 20 27 27 3b 0d 0a 20 20 20 20 20 20 46 4f 52 20 69 20 ┆ streng2 := ''; FOR i ┆ 0x359a0…359c0 3a 3d 20 31 20 54 4f 20 6c 61 65 6e 67 64 65 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 42 45 47 49 ┆:= 1 TO laengde DO BEGI┆ 0x359c0…359e0 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 73 74 72 65 6e 67 32 20 3a 3d 20 73 74 72 65 6e 67 31 28 ┆N streng2 := streng1(┆ 0x359e0…35a00 2e 6c 61 65 6e 67 64 65 20 2b 20 31 20 2d 20 69 2e 29 20 2b 20 73 74 72 65 6e 67 32 3b 0d 0a 20 ┆.laengde + 1 - i.) + streng2; ┆ 0x35a00…35a20 (24, 0, 4) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x3f…] 0x36200…36400 (24, 0, 8) DataBlock {»TRECIFRE.PAS«} 0x36400…36600 (24, 0, 9) DataBlock {»TERNING2.PAS«} 0x36600…36800 (24, 1, 1) DataBlock {»TRECIFRE.PAS«} 0x36800…36a00 (24, 1, 2) DataBlock {»TREKANT.PAS«} 0x36a00…36c00 (24, 1, 3) DataBlock {»TRECIFRE.PAS«} 0x36c00…36c20 (24, 1, 4) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x36e00…36f80 (24, 1, 5) DataBlock {»TRECIFRE.PAS«} 0x36f80…36fa0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x3…] 0x37000…37200 (24, 1, 6) DataBlock {»UGELOEN.PAS«} 0x37200…37400 (24, 1, 7) DataBlock {»TREKANT.PAS«} 0x37400…37600 (24, 1, 8) DataBlock {»UGELOEN.PAS«} 0x37600…37800 (24, 1, 9) DataBlock {»TREKANT.PAS«} 0x37800…37a00 (25, 0, 1) DataBlock {»UGELOEN.PAS«} 0x37a00…37a20 (25, 0, 2) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x37c00…37e00 (25, 0, 3) DataBlock {»UGELOEN.PAS«} 0x37e00…38000 (25, 0, 4) DataBlock {»UD6.PAS«} 0x38000…38200 (25, 0, 5) DataBlock {»UGELOEN.PAS«} 0x38200…38280 (25, 0, 6) DataBlock {»UD6.PAS«} 0x38280…382a0 61 6c 3a 20 49 4e 54 45 47 45 52 3b 0d 0a 20 20 65 6e 68 65 64 73 70 72 69 73 3a 20 52 45 41 4c ┆al: INTEGER; enhedspris: REAL┆ 0x382a0…382c0 3b 0d 0a 20 20 76 61 72 65 6e 61 76 6e 3a 20 53 54 52 49 4e 47 28 2e 32 35 2e 29 3b 0d 0a 20 20 ┆; varenavn: STRING(.25.); ┆ 0x382c0…382e0 20 20 0d 0a 42 45 47 49 4e 0d 0a 20 20 57 52 49 54 45 28 43 48 52 28 31 32 29 2c 27 54 61 73 74 ┆ BEGIN WRITE(CHR(12),'Tast┆ 0x382e0…38300 20 76 61 72 65 6e 73 20 6e 61 76 6e 3a 20 27 29 3b 0d 0a 20 20 52 45 41 44 4c 4e 28 76 61 72 65 ┆ varens navn: '); READLN(vare┆ 0x38300…38320 6e 61 76 6e 29 3b 0d 0a 20 20 57 52 49 54 45 28 27 54 61 73 74 20 61 6e 74 61 6c 20 65 6e 68 65 ┆navn); WRITE('Tast antal enhe┆ 0x38320…38340 64 65 72 3a 20 27 29 3b 0d 0a 20 20 52 45 41 44 4c 4e 28 61 6e 74 61 6c 29 3b 0d 0a 20 20 57 52 ┆der: '); READLN(antal); WR┆ 0x38340…38360 49 54 45 28 27 54 61 73 74 20 76 61 72 65 6e 73 20 65 6e 68 65 64 73 70 72 69 73 3a 20 27 29 3b ┆ITE('Tast varens enhedspris: ');┆ 0x38360…38380 20 52 45 41 44 4c 4e 28 65 6e 68 65 64 73 70 72 69 73 29 3b 0d 0a 20 20 57 52 49 54 45 4c 4e 3b ┆ READLN(enhedspris); WRITELN;┆ 0x38380…383a0 0d 0a 20 20 57 52 49 54 45 4c 4e 28 4c 53 54 2c 27 56 61 72 65 6e 61 76 6e 3a 27 2c 76 61 72 65 ┆ WRITELN(LST,'Varenavn:',vare┆ 0x383a0…383c0 6e 61 76 6e 3a 32 32 29 3b 0d 0a 20 20 57 52 49 54 45 4c 4e 28 4c 53 54 2c 27 41 6e 74 61 6c 20 ┆navn:22); WRITELN(LST,'Antal ┆ 0x383c0…383e0 76 61 72 65 72 3a 20 20 20 20 20 20 20 20 20 27 2c 61 6e 74 61 6c 3a 31 30 29 3b 0d 0a 20 20 57 ┆varer: ',antal:10); W┆ 0x383e0…38400 52 49 54 45 4c 4e 28 4c 53 54 2c 27 56 61 72 65 6e 73 20 65 6e 68 65 64 73 70 72 69 73 3a 20 20 ┆RITELN(LST,'Varens enhedspris: ┆ 0x38400…38600 (25, 0, 7) DataBlock {»UGELOEN.PAS«} 0x38600…38620 (25, 0, 8) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x38800…38880 (25, 0, 9) DataBlock {»UGELOEN.PAS«} 0x38880…388a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x1b…] 0x38c00…38e00 (25, 1, 2) DataBlock {»VARER1.PAS«} 0x38e00…39000 (25, 1, 3) DataBlock {»UPCASE.PAS«} 0x39000…39200 (25, 1, 4) DataBlock {»VARER1.PAS«} 0x39200…39300 (25, 1, 5) DataBlock {»UPCASE.PAS«} 0x39300…39320 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x47…] 0x39c00…39e00 (26, 0, 1) DataBlock {»VARER2.PAS«} 0x39e00…3a000 (26, 0, 2) DataBlock {»VAREPOST.PAS«} 0x3a000…3a080 (26, 0, 3) DataBlock {»VARER2.PAS«} 0x3a080…3a0a0 6e 75 6d 6d 65 72 3a 20 27 29 3b 20 52 45 41 44 4c 4e 28 6e 75 6d 6d 65 72 29 3b 0d 0a 20 20 20 ┆nummer: '); READLN(nummer); ┆ 0x3a0a0…3a0c0 20 20 20 20 20 57 52 49 54 45 4c 4e 3b 0d 0a 20 20 20 20 20 20 20 20 57 52 49 54 45 28 27 56 61 ┆ WRITELN; WRITE('Va┆ 0x3a0c0…3a0e0 72 65 20 6e 75 6d 6d 65 72 3a 20 27 2c 20 6e 75 6d 6d 65 72 3a 33 2c 20 27 20 6c 69 67 67 65 72 ┆re nummer: ', nummer:3, ' ligger┆ 0x3a0e0…3a100 20 69 20 76 61 72 65 67 72 75 70 70 65 20 27 29 3b 0d 0a 20 20 20 20 20 20 20 20 43 41 53 45 20 ┆ i varegruppe '); CASE ┆ 0x3a100…3a120 6e 75 6d 6d 65 72 20 4f 46 0d 0a 20 20 20 20 20 20 20 20 20 20 31 20 20 2e 2e 20 32 30 20 20 3a ┆nummer OF 1 .. 20 :┆ 0x3a120…3a140 20 57 52 49 54 45 4c 4e 28 27 31 27 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 32 31 20 2e 2e 20 ┆ WRITELN('1'); 21 .. ┆ 0x3a140…3a160 34 30 20 20 3a 20 57 52 49 54 45 4c 4e 28 27 32 27 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 34 ┆40 : WRITELN('2'); 4┆ 0x3a160…3a180 31 20 2e 2e 20 36 30 20 20 3a 20 57 52 49 54 45 4c 4e 28 27 33 27 29 3b 0d 0a 20 20 20 20 20 20 ┆1 .. 60 : WRITELN('3'); ┆ 0x3a180…3a1a0 20 20 20 20 36 31 20 2e 2e 20 38 30 20 20 3a 20 57 52 49 54 45 4c 4e 28 27 34 27 29 3b 0d 0a 20 ┆ 61 .. 80 : WRITELN('4'); ┆ 0x3a1a0…3a1c0 20 20 20 20 20 20 20 20 20 38 31 20 2e 2e 20 31 30 30 20 3a 20 57 52 49 54 45 4c 4e 28 27 35 27 ┆ 81 .. 100 : WRITELN('5'┆ 0x3a1c0…3a1e0 29 3b 0d 0a 20 20 20 20 20 20 20 20 4f 54 48 45 52 57 49 53 45 0d 0a 20 20 20 20 20 20 20 20 20 ┆); OTHERWISE ┆ 0x3a1e0…3a200 20 57 52 49 54 45 4c 4e 28 27 20 2a 2a 2a 20 46 6f 72 6b 65 72 74 20 76 61 72 65 6e 75 6d 6d 65 ┆ WRITELN(' *** Forkert varenumme┆ 0x3a200…3a400 (26, 0, 4) DataBlock {»VAREPOST.PAS«} 0x3a400…3a420 (26, 0, 5) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x3a600…3a780 (26, 0, 6) DataBlock {»VAREPOST.PAS«} 0x3a780…3a7a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x13…] 0x3aa00…3ac00 (26, 0, 8) DataBlock {»VOKALER.PAS«} 0x3ac00…3ae00 (26, 0, 9) DataBlock {»VAREPOST.PAS«} 0x3ae00…3b000 (26, 1, 1) DataBlock {»VOKALER.PAS«} 0x3b000…3b020 (26, 1, 2) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x3b200…3b400 (26, 1, 3) DataBlock {»VOKALER.PAS«} 0x3b400…3b420 (26, 1, 4) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x3b600…3b800 (26, 1, 5) DataBlock {»VOKALER.PAS«} 0x3b800…3ba00 (26, 1, 6) DataBlock {»VAREFIL.PAS«} 0x3ba00…3bb00 (26, 1, 7) DataBlock {»VOKALER.PAS«} 0x3bb00…3bb20 76 6f 6b 61 6c 65 72 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 54 48 45 4e 20 61 6e 74 61 6c 76 ┆vokaler THEN antalv┆ 0x3bb20…3bb40 6f 6b 61 6c 65 72 20 3a 3d 20 61 6e 74 61 6c 76 6f 6b 61 6c 65 72 20 2b 20 31 3b 0d 0a 20 20 20 ┆okaler := antalvokaler + 1; ┆ 0x3bb40…3bb60 20 20 20 20 20 20 20 49 46 20 63 68 20 49 4e 20 6b 6f 6e 73 6f 6e 61 6e 74 65 72 0d 0a 20 20 20 ┆ IF ch IN konsonanter ┆ 0x3bb60…3bb80 20 20 20 20 20 20 20 20 20 54 48 45 4e 20 61 6e 74 61 6c 6b 6f 6e 73 6f 6e 61 6e 74 65 72 20 3a ┆ THEN antalkonsonanter :┆ 0x3bb80…3bba0 3d 20 61 6e 74 61 6c 6b 6f 6e 73 6f 6e 61 6e 74 65 72 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 20 ┆= antalkonsonanter + 1; ┆ 0x3bba0…3bbc0 20 20 20 49 46 20 63 68 20 49 4e 20 63 69 66 72 65 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 54 ┆ IF ch IN cifre T┆ 0x3bbc0…3bbe0 48 45 4e 20 61 6e 74 61 6c 63 69 66 72 65 20 3a 3d 20 61 6e 74 61 6c 63 69 66 72 65 20 2b 20 31 ┆HEN antalcifre := antalcifre + 1┆ 0x3bbe0…3bc00 3b 0d 0a 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 57 52 49 54 45 4c 4e 3b 0d 0a 20 ┆; END; WRITELN; ┆ 0x3bc00…3be00 (26, 1, 8) DataBlock {»VAREFIL.PAS«} 0x3be00…3be20 (26, 1, 9) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0xf…] 0x3c000…3c200 (27, 0, 1) DataBlock {»VAREFIL.PAS«} […0x12…] 0x3e600…3e620 (28, 0, 2) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x8ef…]