|
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 A B C D E F G H I J T
Length: 328704 (0x50400) Description: Bits:30003064 Demoprogrammer A-J til Pascal bog Types: 5¼" Floppy Disk, CpmFSAuto Notes: CpmFSAuto,512,2048,64,0x0,1<2,2:0-35:1
Media: [0, 0, 1] … [35, 1, 9] {128: 16, 256: 16, 512: 630} Signature: CpmFSAuto,512,2048,64,0x0,1<2,2:0-35:1 Confidence score: +69/-0 Sector size: 512 Block size: 2048 Directory entries: 64 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 | 1152 | ADDITION.PAS | ⟦01aa51cd8⟧ TextFile |
0 | 0 | 1536 | AEOEAA.PAS | ⟦d0331b8cc⟧ TextFile |
0 | 0 | 384 | BAGFRA.PAS | ⟦b35ae553c⟧ TextFile |
0 | 0 | 1408 | BAGSIDE.PAS | ⟦df19fc52c⟧ TextFile |
0 | 0 | 1152 | BIBLIOT.PAS | ⟦6b4ad7c36⟧ TextFile |
0 | 0 | 1792 | BININSRT.PAS | ⟦744a53a96⟧ TextFile |
0 | 0 | 640 | BINOM1.PAS | ⟦1cffab324⟧ TextFile |
0 | 0 | 512 | BINOM2.PAS | ⟦1d1318a48⟧ TextFile |
0 | 0 | 512 | BINOM3.PAS | ⟦0facfa1bf⟧ TextFile |
0 | 0 | 768 | BINOM4.PAS | ⟦07f2aa981⟧ TextFile |
0 | 0 | 896 | BINTERN.PAS | ⟦692564dd7⟧ TextFile |
0 | 0 | 4096 | BINTRAE1.PAS | ⟦bddfdeea2⟧ TextFile |
0 | 0 | 4224 | BINTRAE2.PAS | ⟦693654248⟧ TextFile |
0 | 0 | 1792 | BISEC.PAS | ⟦e8c6c73f6⟧ TextFile |
0 | 0 | 1152 | BOLDSPIL.PAS | ⟦8e4c96e1d⟧ TextFile |
0 | 0 | 3072 | BRIDGE1.PAS | ⟦e54932410⟧ TextFile |
0 | 0 | 3328 | BRIDGE2.PAS | ⟦88fa57444⟧ TextFile |
0 | 0 | 1408 | BUBBLE2.PAS | ⟦398522a4c⟧ TextFile |
0 | 0 | 1408 | BUBBLE3.PAS | ⟦b808cb35e⟧ TextFile |
0 | 0 | 640 | CELSIUS.PAS | ⟦18fa0e65a⟧ TextFile |
0 | 0 | 1792 | CHECK1.PAS | ⟦6de6a67dd⟧ TextFile |
0 | 0 | 768 | CHECK2.PAS | ⟦8a55597d9⟧ TextFile |
0 | 0 | 768 | CHECK3.PAS | ⟦12592bc5b⟧ TextFile |
0 | 0 | 3328 | CPR.PAS | ⟦6b00f2d7b⟧ TextFile |
0 | 0 | 1408 | CPRDATO.PAS | ⟦18a1147b9⟧ TextFile |
0 | 0 | 1920 | CPRDATO2.PAS | ⟦0ccc6b4a7⟧ TextFile |
0 | 0 | 1024 | CPRNUMRE.PAS | ⟦207e1dce3⟧ TextFile |
0 | 0 | 1920 | CRAPS2.PAS | ⟦4ac7b0fdc⟧ TextFile |
0 | 0 | 640 | DEMOLEN.PAS | ⟦bcccf4293⟧ TextFile |
0 | 0 | 512 | DEMO_STR.PAS | ⟦8b96ab981⟧ TextFile |
0 | 0 | 3200 | DIVISION.PAS | ⟦534b484dc⟧ TextFile |
0 | 0 | 640 | DIVISOR.PAS | ⟦591fba7d2⟧ TextFile |
0 | 0 | 640 | DIVISOR2.PAS | ⟦21fdec0ac⟧ TextFile |
0 | 0 | 7808 | DOBBELT.PAS | ⟦65c4d3749⟧ TextFile |
0 | 0 | 1024 | ENGSTIL.PAS | ⟦ec67d7b02⟧ TextFile |
0 | 0 | 1280 | ERATOSTH.PAS | ⟦dcc2a5042⟧ TextFile |
0 | 0 | 640 | FAHRENHE.PAS | ⟦896caf131⟧ TextFile |
0 | 0 | 2816 | FAKTURA.PAS | ⟦71077f109⟧ TextFile |
0 | 0 | 384 | FIBO.PAS | ⟦a659aa291⟧ TextFile |
0 | 0 | 512 | FIBOFORH.PAS | ⟦6591f9688⟧ TextFile |
0 | 0 | 512 | FIBONAC1.PAS | ⟦1edfefdff⟧ TextFile |
0 | 0 | 768 | FIBONAC2.PAS | ⟦eb55303f4⟧ TextFile |
0 | 0 | 1024 | FILKOPI.PAS | ⟦d8860e7ae⟧ TextFile |
0 | 0 | 768 | FLADE.PAS | ⟦5ae1564b9⟧ TextFile |
0 | 0 | 4608 | FLETNING.PAS | ⟦85510feb4⟧ TextFile |
0 | 0 | 1024 | FORKORT.PAS | ⟦6411df6ce⟧ TextFile |
0 | 0 | 2048 | GAETTEGN.PAS | ⟦307246cb3⟧ TextFile |
0 | 0 | 2944 | GRUNDTAL.PAS | ⟦d6faf1529⟧ TextFile |
0 | 0 | 384 | HARMONIC.PAS | ⟦c7767fe53⟧ TextFile |
0 | 0 | 3840 | HASHTAB.PAS | ⟦dda59e944⟧ TextFile |
0 | 0 | 1408 | HENTPOST.PAS | ⟦6bb4412c8⟧ TextFile |
0 | 0 | 4224 | IDEAL.PAS | ⟦92fe7f71d⟧ TextFile |
0 | 0 | 3328 | IDENTIFI.PAS | ⟦73d0bf88d⟧ TextFile |
0 | 0 | 1792 | INTERHYP.PAS | ⟦bc0672a5b⟧ TextFile |
0 | 0 | 1280 | INVERS.PAS | ⟦b019885b8⟧ TextFile |
0 | 0 | 1024 | JOURNAL.PAS | ⟦40fbe1bcb⟧ 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, 'ADDITION.PAS', 0, 9, 'xl=00', 'bc=00', 'xh=00', 'rc=09', '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, 'AEOEAA.PAS', 0, 12, 'xl=00', 'bc=00', 'xh=00', 'rc=0c', '0-0-0-0-0-0-0-0-0-0-0', [3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03c40…03c60 [0, 'BIBLIOT.PAS', 0, 9, 'xl=00', 'bc=00', 'xh=00', 'rc=09', '0-0-0-0-0-0-0-0-0-0-0', [4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03c60…03c80 [0, 'BOLDSPIL.PAS', 0, 9, 'xl=00', 'bc=00', 'xh=00', 'rc=09', '0-0-0-0-0-0-0-0-0-0-0', [5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03c80…03ca0 [0, 'BAGFRA.PAS', 0, 3, 'xl=00', 'bc=00', 'xh=00', 'rc=03', '0-0-0-0-0-0-0-0-0-0-0', [6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03ca0…03cc0 [0, 'BUBBLE2.PAS', 0, 11, 'xl=00', 'bc=00', 'xh=00', 'rc=0b', '0-0-0-0-0-0-0-0-0-0-0', [7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03cc0…03ce0 [0, 'BINTERN.PAS', 0, 7, 'xl=00', 'bc=00', 'xh=00', 'rc=07', '0-0-0-0-0-0-0-0-0-0-0', [8, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03ce0…03d00 [0, 'BUBBLE3.PAS', 0, 11, 'xl=00', 'bc=00', 'xh=00', 'rc=0b', '0-0-0-0-0-0-0-0-0-0-0', [9, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03d00…03d20 [0, 'BAGSIDE.PAS', 0, 11, 'xl=00', 'bc=00', 'xh=00', 'rc=0b', '0-0-0-0-0-0-0-0-0-0-0', [10, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03d20…03d40 [0, 'BININSRT.PAS', 0, 14, 'xl=00', 'bc=00', 'xh=00', 'rc=0e', '0-0-0-0-0-0-0-0-0-0-0', [11, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03d40…03d60 [0, 'BINOM1.PAS', 0, 5, 'xl=00', 'bc=00', 'xh=00', 'rc=05', '0-0-0-0-0-0-0-0-0-0-0', [12, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03d60…03d80 [0, 'BINOM2.PAS', 0, 4, 'xl=00', 'bc=00', 'xh=00', 'rc=04', '0-0-0-0-0-0-0-0-0-0-0', [13, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03d80…03da0 [0, 'BINOM3.PAS', 0, 4, 'xl=00', 'bc=00', 'xh=00', 'rc=04', '0-0-0-0-0-0-0-0-0-0-0', [14, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03da0…03dc0 [0, 'BINOM4.PAS', 0, 6, 'xl=00', 'bc=00', 'xh=00', 'rc=06', '0-0-0-0-0-0-0-0-0-0-0', [15, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03dc0…03de0 [0, 'BISEC.PAS', 0, 14, 'xl=00', 'bc=00', 'xh=00', 'rc=0e', '0-0-0-0-0-0-0-0-0-0-0', [16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x03de0…03e00 [0, 'BRIDGE1.PAS', 0, 24, 'xl=00', 'bc=00', 'xh=00', 'rc=18', '0-0-0-0-0-0-0-0-0-0-0', [17, 18, 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, 'BRIDGE2.PAS', 0, 26, 'xl=00', 'bc=00', 'xh=00', 'rc=1a', '0-0-0-0-0-0-0-0-0-0-0', [19, 20, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04020…04040 [0, 'BINTRAE1.PAS', 0, 32, 'xl=00', 'bc=00', 'xh=00', 'rc=20', '0-0-0-0-0-0-0-0-0-0-0', [21, 22, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04040…04060 [0, 'BINTRAE2.PAS', 0, 33, 'xl=00', 'bc=00', 'xh=00', 'rc=21', '0-0-0-0-0-0-0-0-0-0-0', [23, 24, 25, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04060…04080 [0, 'CPR.PAS', 0, 26, 'xl=00', 'bc=00', 'xh=00', 'rc=1a', '0-0-0-0-0-0-0-0-0-0-0', [26, 27, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04080…040a0 [0, 'CPRDATO.PAS', 0, 11, 'xl=00', 'bc=00', 'xh=00', 'rc=0b', '0-0-0-0-0-0-0-0-0-0-0', [28, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x040a0…040c0 [0, 'CELSIUS.PAS', 0, 5, 'xl=00', 'bc=00', 'xh=00', 'rc=05', '0-0-0-0-0-0-0-0-0-0-0', [29, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x040c0…040e0 [0, 'CRAPS2.PAS', 0, 15, 'xl=00', 'bc=00', 'xh=00', 'rc=0f', '0-0-0-0-0-0-0-0-0-0-0', [30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x040e0…04100 [0, 'CPRNUMRE.PAS', 0, 8, 'xl=00', 'bc=00', 'xh=00', 'rc=08', '0-0-0-0-0-0-0-0-0-0-0', [31, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04100…04120 [0, 'CHECK1.PAS', 0, 14, 'xl=00', 'bc=00', 'xh=00', 'rc=0e', '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]] 0x04120…04140 [0, 'CPRDATO2.PAS', 0, 15, 'xl=00', 'bc=00', 'xh=00', 'rc=0f', '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]] 0x04140…04160 [0, 'CHECK2.PAS', 0, 6, 'xl=00', 'bc=00', 'xh=00', 'rc=06', '0-0-0-0-0-0-0-0-0-0-0', [34, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04160…04180 [0, 'CHECK3.PAS', 0, 6, 'xl=00', 'bc=00', 'xh=00', 'rc=06', '0-0-0-0-0-0-0-0-0-0-0', [35, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04180…041a0 [0, 'DIVISOR2.PAS', 0, 5, 'xl=00', 'bc=00', 'xh=00', 'rc=05', '0-0-0-0-0-0-0-0-0-0-0', [36, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x041a0…041c0 [0, 'DIVISOR.PAS', 0, 5, 'xl=00', 'bc=00', 'xh=00', 'rc=05', '0-0-0-0-0-0-0-0-0-0-0', [37, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x041c0…041e0 [0, 'DEMOLEN.PAS', 0, 5, 'xl=00', 'bc=00', 'xh=00', 'rc=05', '0-0-0-0-0-0-0-0-0-0-0', [38, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x041e0…04200 [0, 'DEMO_STR.PAS', 0, 4, 'xl=00', 'bc=00', 'xh=00', 'rc=04', '0-0-0-0-0-0-0-0-0-0-0', [39, 0, 0, 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, 'DOBBELT.PAS', 0, 61, 'xl=00', 'bc=00', 'xh=00', 'rc=3d', '0-0-0-0-0-0-0-0-0-0-0', [40, 41, 42, 43, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04420…04440 [0, 'DIVISION.PAS', 0, 25, 'xl=00', 'bc=00', 'xh=00', 'rc=19', '0-0-0-0-0-0-0-0-0-0-0', [44, 45, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04440…04460 [0, 'ERATOSTH.PAS', 0, 10, 'xl=00', 'bc=00', 'xh=00', 'rc=0a', '0-0-0-0-0-0-0-0-0-0-0', [46, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04460…04480 [0, 'ENGSTIL.PAS', 0, 8, 'xl=00', 'bc=00', 'xh=00', 'rc=08', '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]] 0x04480…044a0 [0, 'FLADE.PAS', 0, 6, 'xl=00', 'bc=00', 'xh=00', 'rc=06', '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]] 0x044a0…044c0 [0, 'FAHRENHE.PAS', 0, 5, 'xl=00', 'bc=00', 'xh=00', 'rc=05', '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]] 0x044c0…044e0 [0, 'FIBO.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]] 0x044e0…04500 [0, 'FIBOFORH.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]] 0x04500…04520 [0, 'FORKORT.PAS', 0, 8, 'xl=00', 'bc=00', 'xh=00', 'rc=08', '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]] 0x04520…04540 [0, 'FAKTURA.PAS', 0, 22, 'xl=00', 'bc=00', 'xh=00', 'rc=16', '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]] 0x04540…04560 [0, 'FLETNING.PAS', 0, 36, 'xl=00', 'bc=00', 'xh=00', 'rc=24', '0-0-0-0-0-0-0-0-0-0-0', [55, 56, 57, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04560…04580 [0, 'FIBONAC1.PAS', 0, 4, 'xl=00', 'bc=00', 'xh=00', 'rc=04', '0-0-0-0-0-0-0-0-0-0-0', [58, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04580…045a0 [0, 'FIBONAC2.PAS', 0, 6, 'xl=00', 'bc=00', 'xh=00', 'rc=06', '0-0-0-0-0-0-0-0-0-0-0', [59, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x045a0…045c0 [0, 'FILKOPI.PAS', 0, 8, 'xl=00', 'bc=00', 'xh=00', 'rc=08', '0-0-0-0-0-0-0-0-0-0-0', [60, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x045c0…045e0 [0, 'GRUNDTAL.PAS', 0, 23, 'xl=00', 'bc=00', 'xh=00', 'rc=17', '0-0-0-0-0-0-0-0-0-0-0', [61, 62, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x045e0…04600 [0, 'GAETTEGN.PAS', 0, 16, 'xl=00', 'bc=00', 'xh=00', 'rc=10', '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]] 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, 'HARMONIC.PAS', 0, 3, 'xl=00', 'bc=00', 'xh=00', 'rc=03', '0-0-0-0-0-0-0-0-0-0-0', [64, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04820…04840 [0, 'HENTPOST.PAS', 0, 11, 'xl=00', 'bc=00', 'xh=00', 'rc=0b', '0-0-0-0-0-0-0-0-0-0-0', [65, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04840…04860 [0, 'HASHTAB.PAS', 0, 30, 'xl=00', 'bc=00', 'xh=00', 'rc=1e', '0-0-0-0-0-0-0-0-0-0-0', [66, 67, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04860…04880 [0, 'IDEAL.PAS', 0, 33, 'xl=00', 'bc=00', 'xh=00', 'rc=21', '0-0-0-0-0-0-0-0-0-0-0', [68, 69, 70, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04880…048a0 [0, 'INTERHYP.PAS', 0, 14, 'xl=00', 'bc=00', 'xh=00', 'rc=0e', '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]] 0x048a0…048c0 [0, 'INVERS.PAS', 0, 10, 'xl=00', 'bc=00', 'xh=00', 'rc=0a', '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]] 0x048c0…048e0 [0, 'IDENTIFI.PAS', 0, 26, 'xl=00', 'bc=00', 'xh=00', 'rc=1a', '0-0-0-0-0-0-0-0-0-0-0', [73, 74, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x048e0…04900 [0, 'JOURNAL.PAS', 0, 8, 'xl=00', 'bc=00', 'xh=00', 'rc=08', '0-0-0-0-0-0-0-0-0-0-0', [75, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]] 0x04900…04920 Dirent {Status=0xe5} […0x7…] 0x04a00…04c00 (2, 0, 8) DataBlock {»ADDITION.PAS«} 0x04c00…04c20 (2, 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…] 0x04e00…05000 (2, 1, 1) DataBlock {»ADDITION.PAS«} 0x05000…05200 (2, 1, 2) DataBlock {»AEOEAA.PAS«} 0x05200…05280 (2, 1, 3) DataBlock {»ADDITION.PAS«} 0x05280…052a0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x05800…05a00 (2, 1, 6) DataBlock {»BIBLIOT.PAS«} 0x05a00…05c00 (2, 1, 7) DataBlock {»AEOEAA.PAS«} 0x05c00…05e00 (2, 1, 8) DataBlock {»BIBLIOT.PAS«} 0x05e00…06000 (2, 1, 9) DataBlock {»AEOEAA.PAS«} 0x06000…06080 (3, 0, 1) DataBlock {»BIBLIOT.PAS«} 0x06080…060a0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x06600…06780 (3, 0, 4) DataBlock {»BAGFRA.PAS«} 0x06780…067a0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x06800…06a00 (3, 0, 5) DataBlock {»BOLDSPIL.PAS«} 0x06a00…06a20 (3, 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…] 0x06c00…06e00 (3, 0, 7) DataBlock {»BOLDSPIL.PAS«} 0x06e00…06e20 (3, 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…] 0x07000…07080 (3, 0, 9) DataBlock {»BOLDSPIL.PAS«} 0x07080…070a0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x07400…07600 (3, 1, 2) DataBlock {»BINTERN.PAS«} 0x07600…07800 (3, 1, 3) DataBlock {»BUBBLE2.PAS«} 0x07800…07980 (3, 1, 4) DataBlock {»BINTERN.PAS«} 0x07980…079a0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x07a00…07c00 (3, 1, 5) DataBlock {»BUBBLE2.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…07f80 (3, 1, 7) DataBlock {»BUBBLE2.PAS«} 0x07f80…07fa0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x08400…08600 (4, 0, 1) DataBlock {»BUBBLE3.PAS«} 0x08600…08800 (4, 0, 2) DataBlock {»BAGSIDE.PAS«} 0x08800…08a00 (4, 0, 3) DataBlock {»BUBBLE3.PAS«} 0x08a00…08b80 (4, 0, 4) DataBlock {»BAGSIDE.PAS«} 0x08b80…08ba0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x08c00…08d80 (4, 0, 5) DataBlock {»BUBBLE3.PAS«} 0x08d80…08da0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x09200…09400 (4, 0, 8) DataBlock {»BININSRT.PAS«} 0x09400…09600 (4, 0, 9) DataBlock {»BAGSIDE.PAS«} 0x09600…09800 (4, 1, 1) DataBlock {»BININSRT.PAS«} 0x09800…09820 (4, 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…] 0x09a00…09c00 (4, 1, 3) DataBlock {»BININSRT.PAS«} 0x09c00…09c20 (4, 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…] 0x09e00…09f00 (4, 1, 5) DataBlock {»BININSRT.PAS«} 0x09f00…09f20 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x0a000…0a200 (4, 1, 6) DataBlock {»BINOM2.PAS«} 0x0a200…0a400 (4, 1, 7) DataBlock {»BINOM1.PAS«} 0x0a400…0a420 (4, 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…] 0x0a600…0a680 (4, 1, 9) DataBlock {»BINOM1.PAS«} 0x0a680…0a6a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x3b…] 0x0ae00…0b000 (5, 0, 4) DataBlock {»BINOM4.PAS«} 0x0b000…0b200 (5, 0, 5) DataBlock {»BINOM3.PAS«} 0x0b200…0b300 (5, 0, 6) DataBlock {»BINOM4.PAS«} 0x0b300…0b320 3d 20 31 20 54 4f 20 6e 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 46 4f 52 20 6a 20 3a 3d 20 30 20 ┆= 1 TO n DO FOR j := 0 ┆ 0x0b320…0b340 54 4f 20 69 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 20 20 49 46 20 28 6a 20 3d 20 30 29 20 4f 52 ┆TO i DO IF (j = 0) OR┆ 0x0b340…0b360 20 28 69 20 3d 20 6a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 54 48 45 4e 20 74 61 62 28 2e ┆ (i = j) THEN tab(.┆ 0x0b360…0b380 69 2c 20 6a 2e 29 20 3a 3d 20 31 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 74 61 ┆i, j.) := 1 ELSE ta┆ 0x0b380…0b3a0 62 28 2e 69 2c 20 6a 2e 29 20 3a 3d 20 74 61 62 28 2e 69 20 2d 20 31 2c 20 6a 2e 29 20 2b 20 74 ┆b(.i, j.) := tab(.i - 1, j.) + t┆ 0x0b3a0…0b3c0 61 62 28 2e 69 20 2d 20 31 2c 20 6a 20 2d 20 31 2e 29 3b 0d 0a 20 20 20 20 20 20 6b 20 3a 3d 20 ┆ab(.i - 1, j - 1.); k := ┆ 0x0b3c0…0b3e0 74 61 62 28 2e 6e 2c 20 72 2e 29 3b 0d 0a 20 20 20 20 45 4e 44 3b 0d 0a 20 20 0d 0a 20 20 42 45 ┆tab(.n, r.); END; BE┆ 0x0b3e0…0b400 47 49 4e 0d 0a 20 20 20 20 57 52 49 54 45 28 43 4c 52 48 4f 4d 29 3b 0d 0a 20 20 20 20 57 52 49 ┆GIN WRITE(CLRHOM); WRI┆ 0x0b400…0b420 (5, 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 ┆ ┆ […0x3f…] 0x0bc00…0be00 (5, 1, 2) DataBlock {»BRIDGE1.PAS«} 0x0be00…0c000 (5, 1, 3) DataBlock {»BISEC.PAS«} 0x0c000…0c200 (5, 1, 4) DataBlock {»BRIDGE1.PAS«} 0x0c200…0c400 (5, 1, 5) DataBlock {»BISEC.PAS«} 0x0c400…0c600 (5, 1, 6) DataBlock {»BRIDGE1.PAS«} 0x0c600…0c800 (5, 1, 7) DataBlock {»BISEC.PAS«} 0x0c800…0ca00 (5, 1, 8) DataBlock {»BRIDGE1.PAS«} 0x0ca00…0cb00 (5, 1, 9) DataBlock {»BISEC.PAS«} 0x0cb00…0cb20 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x0cc00…0ce00 (6, 0, 1) DataBlock {»BRIDGE1.PAS«} 0x0ce00…0d000 (6, 0, 2) DataBlock {»BRIDGE2.PAS«} 0x0d000…0d200 (6, 0, 3) DataBlock {»BRIDGE1.PAS«} 0x0d200…0d400 (6, 0, 4) DataBlock {»BRIDGE2.PAS«} 0x0d400…0d420 (6, 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…] 0x0d600…0d800 (6, 0, 6) DataBlock {»BRIDGE2.PAS«} 0x0d800…0d820 (6, 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…] 0x0da00…0dc00 (6, 0, 8) DataBlock {»BRIDGE2.PAS«} […0x2…] 0x0e000…0e200 (6, 1, 2) DataBlock {»BINTRAE1.PAS«} 0x0e200…0e300 (6, 1, 3) DataBlock {»BRIDGE2.PAS«} 0x0e300…0e320 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x0e400…0e600 (6, 1, 4) DataBlock {»BINTRAE1.PAS«} 0x0e600…0e620 (6, 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…] 0x0e800…0ea00 (6, 1, 6) DataBlock {»BINTRAE1.PAS«} […0x4…] 0x0f200…0f400 (7, 0, 2) DataBlock {»BINTRAE2.PAS«} 0x0f400…0f600 (7, 0, 3) DataBlock {»BINTRAE1.PAS«} 0x0f600…0f800 (7, 0, 4) DataBlock {»BINTRAE2.PAS«} […0x6…] 0x10400…10600 (7, 1, 2) DataBlock {»CPR.PAS«} 0x10600…10680 (7, 1, 3) DataBlock {»BINTRAE2.PAS«} 0x10680…106a0 57 52 49 54 45 28 27 48 76 69 6c 6b 65 74 20 6f 72 64 20 73 6b 61 6c 20 73 7c 67 65 73 3a 20 27 ┆WRITE('Hvilket ord skal søges: '┆ 0x106a0…106c0 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 20 ┆); ┆ 0x106c0…106e0 20 52 45 41 44 4c 4e 28 6f 72 64 5f 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ READLN(ord_); ┆ 0x106e0…10700 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 66 69 6e 64 28 72 6f 64 2c 20 6f 72 64 5f 29 20 ┆ IF find(rod, ord_) ┆ 0x10700…10720 3c 3e 20 4e 49 4c 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 ┆ 0x10720…10740 20 20 20 20 20 20 20 54 48 45 4e 20 57 52 49 54 45 4c 4e 28 6f 72 64 5f 2c 20 27 20 66 69 6e 64 ┆ THEN WRITELN(ord_, ' find┆ 0x10740…10760 65 73 27 29 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 ┆es') ┆ 0x10760…10780 20 20 20 20 20 45 4c 53 45 20 57 52 49 54 45 4c 4e 28 6f 72 64 5f 2c 20 27 20 66 69 6e 64 65 73 ┆ ELSE WRITELN(ord_, ' findes┆ 0x10780…107a0 20 69 6b 6b 65 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 ┆ ikke'); ┆ 0x107a0…107c0 20 20 20 20 20 20 20 20 20 57 52 49 54 45 28 27 54 61 73 74 20 3c 52 45 54 55 52 4e 3e 27 29 3b ┆ WRITE('Tast <RETURN>');┆ 0x107c0…107e0 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 20 ┆ ┆ 0x107e0…10800 20 52 45 41 44 4c 4e 28 63 68 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ READLN(ch); ┆ 0x10800…10a00 (7, 1, 4) DataBlock {»CPR.PAS«} 0x10a00…10a20 (7, 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…] 0x10c00…10e00 (7, 1, 6) DataBlock {»CPR.PAS«} 0x10e00…10e20 (7, 1, 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…] 0x11000…11200 (7, 1, 8) DataBlock {»CPR.PAS«} 0x11200…11220 (7, 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…] 0x11400…11600 (8, 0, 1) DataBlock {»CPR.PAS«} 0x11600…11800 (8, 0, 2) DataBlock {»CPRDATO.PAS«} 0x11800…11a00 (8, 0, 3) DataBlock {»CPR.PAS«} 0x11a00…11b80 (8, 0, 4) DataBlock {»CPRDATO.PAS«} 0x11b80…11ba0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x11c00…11d00 (8, 0, 5) DataBlock {»CPR.PAS«} 0x11d00…11d20 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x12200…12400 (8, 0, 8) DataBlock {»CELSIUS.PAS«} 0x12400…12600 (8, 0, 9) DataBlock {»CPRDATO.PAS«} 0x12600…12680 (8, 1, 1) DataBlock {»CELSIUS.PAS«} 0x12680…126a0 6b 72 69 76 65 72 20 52 45 41 4d 55 52 2d 20 6f 67 20 46 41 48 52 45 4e 48 45 49 54 2d 67 72 61 ┆kriver REAMUR- og FAHRENHEIT-gra┆ 0x126a0…126c0 64 74 61 6c 6c 65 6e 65 2c 27 29 3b 0d 0a 20 20 20 20 57 52 49 54 45 4c 4e 28 27 6e 7d 72 20 6d ┆dtallene,'); WRITELN('når m┆ 0x126c0…126e0 61 6e 20 69 6e 64 74 61 73 74 65 72 20 67 72 61 64 74 61 6c 6c 65 74 20 66 6f 72 20 43 45 4c 53 ┆an indtaster gradtallet for CELS┆ 0x126e0…12700 49 55 53 27 29 3b 0d 0a 20 20 20 20 57 52 49 54 45 4c 4e 3b 0d 0a 20 20 20 20 57 52 49 54 45 28 ┆IUS'); WRITELN; WRITE(┆ 0x12700…12720 27 49 6e 64 74 61 73 74 20 43 45 4c 53 49 55 53 3a 20 27 29 3b 20 52 45 41 44 4c 4e 28 63 65 6c ┆'Indtast CELSIUS: '); READLN(cel┆ 0x12720…12740 73 69 75 73 29 3b 0d 0a 20 20 20 20 72 65 61 6d 75 72 20 3a 3d 20 63 65 6c 73 69 75 73 20 2a 20 ┆sius); reamur := celsius * ┆ 0x12740…12760 30 2e 38 3b 0d 0a 20 20 20 20 66 61 68 72 65 6e 68 65 69 74 20 3a 3d 20 63 65 6c 73 69 75 73 20 ┆0.8; fahrenheit := celsius ┆ 0x12760…12780 2a 20 31 2e 38 20 2b 20 33 32 3b 0d 0a 20 20 20 20 57 52 49 54 45 4c 4e 3b 0d 0a 20 20 20 20 57 ┆* 1.8 + 32; WRITELN; W┆ 0x12780…127a0 52 49 54 45 4c 4e 28 27 43 65 6c 73 69 75 73 3a 20 20 20 20 27 2c 20 63 65 6c 73 69 75 73 20 3a ┆RITELN('Celsius: ', celsius :┆ 0x127a0…127c0 20 37 20 3a 20 32 29 3b 0d 0a 20 20 20 20 57 52 49 54 45 4c 4e 28 27 52 65 61 6d 75 72 3a 20 20 ┆ 7 : 2); WRITELN('Reamur: ┆ 0x127c0…127e0 20 20 20 27 2c 20 72 65 61 6d 75 72 20 3a 20 37 20 3a 20 32 29 3b 0d 0a 20 20 20 20 57 52 49 54 ┆ ', reamur : 7 : 2); WRIT┆ 0x127e0…12800 45 4c 4e 28 27 46 61 68 72 65 6e 68 65 69 74 3a 20 27 2c 20 66 61 68 72 65 6e 68 65 69 74 20 3a ┆ELN('Fahrenheit: ', fahrenheit :┆ 0x12800…12a00 (8, 1, 2) DataBlock {»CRAPS2.PAS«} 0x12a00…12a20 (8, 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…] 0x12c00…12d80 (8, 1, 4) DataBlock {»CRAPS2.PAS«} 0x12d80…12da0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x13000…13200 (8, 1, 6) DataBlock {»CPRNUMRE.PAS«} 0x13200…13400 (8, 1, 7) DataBlock {»CRAPS2.PAS«} 0x13400…13600 (8, 1, 8) DataBlock {»CPRNUMRE.PAS«} 0x13600…13800 (8, 1, 9) DataBlock {»CRAPS2.PAS«} 0x13800…13820 (9, 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…] 0x13a00…13b00 (9, 0, 2) DataBlock {»CHECK1.PAS«} 0x13b00…13b20 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x17…] 0x13e00…14000 (9, 0, 4) DataBlock {»CPRDATO2.PAS«} 0x14000…14200 (9, 0, 5) DataBlock {»CHECK1.PAS«} 0x14200…14400 (9, 0, 6) DataBlock {»CPRDATO2.PAS«} 0x14400…14600 (9, 0, 7) DataBlock {»CHECK1.PAS«} 0x14600…14800 (9, 0, 8) DataBlock {»CPRDATO2.PAS«} 0x14800…14a00 (9, 0, 9) DataBlock {»CHECK1.PAS«} 0x14a00…14b80 (9, 1, 1) DataBlock {»CPRDATO2.PAS«} 0x14b80…14ba0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x14c00…14e00 (9, 1, 2) DataBlock {»CHECK3.PAS«} 0x14e00…15000 (9, 1, 3) DataBlock {»CHECK2.PAS«} 0x15000…15100 (9, 1, 4) DataBlock {»CHECK3.PAS«} 0x15100…15120 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x15200…15300 (9, 1, 5) DataBlock {»CHECK2.PAS«} 0x15300…15320 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x15c00…15e00 (10, 0, 1) DataBlock {»DIVISOR2.PAS«} 0x15e00…15e80 (10, 0, 2) DataBlock {»DIVISOR.PAS«} 0x15e80…15ea0 52 49 54 45 28 43 4c 52 48 4f 4d 29 3b 0d 0a 20 20 20 20 57 52 49 54 45 28 27 49 6e 64 74 61 73 ┆RITE(CLRHOM); WRITE('Indtas┆ 0x15ea0…15ec0 74 20 65 74 20 68 65 6c 74 61 6c 3a 20 27 29 3b 20 52 45 41 44 4c 4e 28 68 65 6c 74 61 6c 29 3b ┆t et heltal: '); READLN(heltal);┆ 0x15ec0…15ee0 0d 0a 20 20 20 20 57 52 49 54 45 4c 4e 28 68 65 6c 74 61 6c 2c 20 27 20 68 61 72 20 66 7c 6c 67 ┆ WRITELN(heltal, ' har følg┆ 0x15ee0…15f00 65 6e 64 65 20 64 69 76 69 73 6f 72 65 72 3a 27 29 3b 0d 0a 20 20 20 20 64 69 76 69 73 6f 72 20 ┆ende divisorer:'); divisor ┆ 0x15f00…15f20 3a 3d 20 32 3b 0d 0a 20 20 20 20 52 45 50 45 41 54 0d 0a 20 20 20 20 20 20 49 46 20 28 68 65 6c ┆:= 2; REPEAT IF (hel┆ 0x15f20…15f40 74 61 6c 20 4d 4f 44 20 64 69 76 69 73 6f 72 29 20 3d 20 30 0d 0a 20 20 20 20 20 20 20 20 54 48 ┆tal MOD divisor) = 0 TH┆ 0x15f40…15f60 45 4e 0d 0a 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 ┆EN BEGIN ┆ 0x15f60…15f80 20 57 52 49 54 45 28 64 69 76 69 73 6f 72 20 3a 20 36 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 ┆ WRITE(divisor : 6); ┆ 0x15f80…15fa0 20 20 49 46 20 64 69 76 69 73 6f 72 20 3c 3e 20 28 68 65 6c 74 61 6c 20 44 49 56 20 64 69 76 69 ┆ IF divisor <> (heltal DIV divi┆ 0x15fa0…15fc0 73 6f 72 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 48 45 4e 20 57 52 49 54 45 4c 4e ┆sor) THEN WRITELN┆ 0x15fc0…15fe0 28 68 65 6c 74 61 6c 20 44 49 56 20 64 69 76 69 73 6f 72 20 3a 20 36 29 3b 0d 0a 20 20 20 20 20 ┆(heltal DIV divisor : 6); ┆ 0x15fe0…16000 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 20 20 64 69 76 69 73 6f 72 20 3a 3d 20 64 69 76 69 ┆ END; divisor := divi┆ 0x16000…16080 (10, 0, 3) DataBlock {»DIVISOR2.PAS«} 0x16080…160a0 20 20 20 20 20 20 20 57 52 49 54 45 28 43 48 52 28 31 32 29 2c 20 27 49 6e 64 74 61 73 74 20 65 ┆ WRITE(CHR(12), 'Indtast e┆ 0x160a0…160c0 74 20 68 65 6c 74 20 74 61 6c 3a 20 27 29 3b 20 52 45 41 44 4c 4e 28 74 61 6c 29 3b 0d 0a 20 20 ┆t helt tal: '); READLN(tal); ┆ 0x160c0…160e0 20 20 20 20 20 20 20 20 57 52 49 54 45 28 27 49 6e 64 74 61 73 74 20 64 69 76 69 73 6f 72 3a 20 ┆ WRITE('Indtast divisor: ┆ 0x160e0…16100 27 29 3b 20 52 45 41 44 4c 4e 28 64 69 76 69 73 6f 72 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 ┆'); READLN(divisor); ┆ 0x16100…16120 66 61 6b 74 6f 72 20 3a 3d 20 30 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 67 6c 74 61 6c 20 3a 3d ┆faktor := 0; gltal :=┆ 0x16120…16140 20 74 61 6c 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 57 48 49 4c 45 20 74 61 6c 20 4d 4f 44 20 64 ┆ tal; WHILE tal MOD d┆ 0x16140…16160 69 76 69 73 6f 72 20 3d 20 30 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 42 45 47 49 4e ┆ivisor = 0 DO BEGIN┆ 0x16160…16180 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 61 6b 74 6f 72 20 3a 3d 20 66 61 6b 74 6f 72 ┆ faktor := faktor┆ 0x16180…161a0 20 2b 31 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 61 6c 20 3a 3d 20 74 61 6c 20 44 ┆ +1; tal := tal D┆ 0x161a0…161c0 49 56 20 64 69 76 69 73 6f 72 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 ┆IV divisor; END; ┆ 0x161c0…161e0 20 20 20 20 20 20 20 20 20 57 52 49 54 45 4c 4e 28 67 6c 74 61 6c 2c 20 27 20 69 6e 64 65 68 6f ┆ WRITELN(gltal, ' indeho┆ 0x161e0…16200 6c 64 65 72 20 66 61 6b 74 6f 72 65 6e 20 27 2c 20 64 69 76 69 73 6f 72 2c 20 27 20 27 2c 0d 0a ┆lder faktoren ', divisor, ' ', ┆ 0x16200…16220 (10, 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…] 0x16a00…16c00 (10, 0, 8) DataBlock {»DEMOLEN.PAS«} 0x16c00…16e00 (10, 0, 9) DataBlock {»DIVISOR.PAS«} 0x16e00…16e80 (10, 1, 1) DataBlock {»DEMOLEN.PAS«} 0x16e80…16ea0 67 20 3a 20 73 74 72 65 6e 67 74 79 70 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 69 20 3a 20 49 ┆g : strengtype; i : I┆ 0x16ea0…16ec0 4e 54 45 47 45 52 3b 0d 0a 20 20 20 20 20 20 20 20 0d 0a 20 20 20 20 20 20 20 20 42 45 47 49 4e ┆NTEGER; BEGIN┆ 0x16ec0…16ee0 0d 0a 20 20 20 20 20 20 20 20 20 20 73 74 72 65 6e 67 20 3a 3d 20 27 27 3b 0d 0a 20 20 20 20 20 ┆ streng := ''; ┆ 0x16ee0…16f00 20 20 20 20 20 46 4f 52 20 69 20 3a 3d 20 31 20 54 4f 20 35 20 44 4f 0d 0a 20 20 20 20 20 20 20 ┆ FOR i := 1 TO 5 DO ┆ 0x16f00…16f20 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 57 52 49 54 45 4c ┆ BEGIN WRITEL┆ 0x16f20…16f40 4e 28 73 74 72 65 6e 67 3a 31 32 2c 20 4c 45 4e 28 73 74 72 65 6e 67 29 3a 33 29 3b 0d 0a 20 20 ┆N(streng:12, LEN(streng):3); ┆ 0x16f40…16f60 20 20 20 20 20 20 20 20 20 20 20 20 73 74 72 65 6e 67 20 3a 3d 20 73 74 72 65 6e 67 20 2b 27 41 ┆ streng := streng +'A┆ 0x16f60…16f80 27 3b 0d 0a 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 20 20 ┆'; END; ┆ 0x16f80…16fa0 57 52 49 54 45 4c 4e 28 73 74 72 65 6e 67 3a 31 32 2c 20 4c 45 4e 28 73 74 72 65 6e 67 29 3a 33 ┆WRITELN(streng:12, LEN(streng):3┆ 0x16fa0…16fc0 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 73 74 72 65 6e 67 20 3a 3d 20 73 74 72 65 6e 67 20 2b ┆); streng := streng +┆ 0x16fc0…16fe0 20 73 74 72 65 6e 67 20 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 57 52 49 54 45 4c 4e 28 73 74 72 ┆ streng ; WRITELN(str┆ 0x16fe0…17000 65 6e 67 3a 31 32 2c 20 4c 45 4e 28 73 74 72 65 6e 67 29 3a 33 29 3b 0d 0a 20 20 20 20 20 20 20 ┆eng:12, LEN(streng):3); ┆ 0x17000…17020 (10, 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…] 0x17800…17a00 (10, 1, 6) DataBlock {»DOBBELT.PAS«} 0x17a00…17c00 (10, 1, 7) DataBlock {»DEMO_STR.PAS«} 0x17c00…17e00 (10, 1, 8) DataBlock {»DOBBELT.PAS«} 0x17e00…17e20 (10, 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…] 0x18000…18200 (11, 0, 1) DataBlock {»DOBBELT.PAS«} […0x9…] 0x19400…19600 (11, 1, 2) DataBlock {»DIVISION.PAS«} 0x19600…19800 (11, 1, 3) DataBlock {»DOBBELT.PAS«} 0x19800…19a00 (11, 1, 4) DataBlock {»DIVISION.PAS«} 0x19a00…19c00 (11, 1, 5) DataBlock {»DOBBELT.PAS«} 0x19c00…19e00 (11, 1, 6) DataBlock {»DIVISION.PAS«} 0x19e00…1a000 (11, 1, 7) DataBlock {»DOBBELT.PAS«} 0x1a000…1a200 (11, 1, 8) DataBlock {»DIVISION.PAS«} 0x1a200…1a280 (11, 1, 9) DataBlock {»DOBBELT.PAS«} 0x1a280…1a2a0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x1a400…1a600 (12, 0, 1) DataBlock {»DIVISION.PAS«} 0x1a600…1a800 (12, 0, 2) DataBlock {»ERATOSTH.PAS«} 0x1a800…1aa00 (12, 0, 3) DataBlock {»DIVISION.PAS«} 0x1aa00…1ab00 (12, 0, 4) DataBlock {»ERATOSTH.PAS«} 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…1ac80 (12, 0, 5) DataBlock {»DIVISION.PAS«} 0x1ac80…1aca0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x1b200…1b400 (12, 0, 8) DataBlock {»ENGSTIL.PAS«} 0x1b400…1b600 (12, 0, 9) DataBlock {»ERATOSTH.PAS«} 0x1b600…1b800 (12, 1, 1) DataBlock {»ENGSTIL.PAS«} 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 {»FAHRENHE.PAS«} 0x1c200…1c400 (12, 1, 7) DataBlock {»FLADE.PAS«} 0x1c400…1c480 (12, 1, 8) DataBlock {»FAHRENHE.PAS«} 0x1c480…1c4a0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x1c600…1c700 (12, 1, 9) DataBlock {»FLADE.PAS«} 0x1c700…1c720 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x37…] 0x1ce00…1d000 (13, 0, 4) DataBlock {»FIBOFORH.PAS«} 0x1d000…1d180 (13, 0, 5) DataBlock {»FIBO.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 {»FAKTURA.PAS«} 0x1de00…1e000 (13, 1, 3) DataBlock {»FORKORT.PAS«} 0x1e000…1e200 (13, 1, 4) DataBlock {»FAKTURA.PAS«} 0x1e200…1e400 (13, 1, 5) DataBlock {»FORKORT.PAS«} 0x1e400…1e600 (13, 1, 6) DataBlock {»FAKTURA.PAS«} 0x1e600…1e620 (13, 1, 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…] 0x1e800…1ea00 (13, 1, 8) DataBlock {»FAKTURA.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…1ee00 (14, 0, 1) DataBlock {»FAKTURA.PAS«} 0x1ee00…1f000 (14, 0, 2) DataBlock {»FLETNING.PAS«} 0x1f000…1f100 (14, 0, 3) DataBlock {»FAKTURA.PAS«} 0x1f100…1f120 6f 6d 73 20 3a 20 32 30 20 3a 20 32 29 3b 0d 0a 20 20 20 20 20 20 57 52 49 54 45 4c 4e 28 27 20 ┆oms : 20 : 2); WRITELN(' ┆ 0x1f120…1f140 27 20 3a 20 34 35 2c 20 27 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆' : 45, '-----------------------┆ 0x1f140…1f160 2d 2d 27 29 3b 0d 0a 20 20 20 20 20 20 57 52 49 54 45 4c 4e 28 27 20 27 20 3a 20 34 35 2c 20 20 ┆--'); WRITELN(' ' : 45, ┆ 0x1f160…1f180 27 49 41 4c 54 20 27 2c 20 74 6f 74 61 6c 20 2b 20 6d 6f 6d 73 20 3a 20 32 30 20 3a 20 32 29 3b ┆'IALT ', total + moms : 20 : 2);┆ 0x1f180…1f1a0 0d 0a 20 20 20 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 69 ┆ END; BEGIN i┆ 0x1f1a0…1f1c0 6e 64 28 6b 75 6e 64 65 6e 61 76 6e 2c 20 61 6e 74 61 6c 5f 76 61 72 65 72 2c 20 76 61 72 65 6e ┆nd(kundenavn, antal_varer, varen┆ 0x1f1c0…1f1e0 75 6d 6d 65 72 2c 20 76 61 72 65 6e 61 76 6e 2c 20 76 61 72 65 61 6e 74 61 6c 2c 20 76 61 72 65 ┆ummer, varenavn, vareantal, vare┆ 0x1f1e0…1f200 70 72 69 73 29 3b 0d 0a 20 20 20 20 73 75 6d 20 3a 3d 20 30 3b 0d 0a 20 20 20 20 46 4f 52 20 69 ┆pris); sum := 0; FOR i┆ 0x1f200…1f400 (14, 0, 4) DataBlock {»FLETNING.PAS«} 0x1f400…1f420 (14, 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…] 0x1f600…1f800 (14, 0, 6) DataBlock {»FLETNING.PAS«} 0x1f800…1f820 (14, 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…] 0x1fa00…1fc00 (14, 0, 8) DataBlock {»FLETNING.PAS«} […0x2…] 0x20000…20020 (14, 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…] 0x20200…20400 (14, 1, 3) DataBlock {»FLETNING.PAS«} 0x20400…20420 (14, 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…] 0x20600…20800 (14, 1, 5) DataBlock {»FLETNING.PAS«} 0x20800…20a00 (14, 1, 6) DataBlock {»FIBONAC1.PAS«} 0x20a00…20c00 (14, 1, 7) DataBlock {»FLETNING.PAS«} 0x20c00…20c20 (14, 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 ┆ ┆ […0x4f…] 0x21600…21800 (15, 0, 4) DataBlock {»FILKOPI.PAS«} 0x21800…21a00 (15, 0, 5) DataBlock {»FIBONAC2.PAS«} 0x21a00…21c00 (15, 0, 6) DataBlock {»FILKOPI.PAS«} 0x21c00…21d00 (15, 0, 7) DataBlock {»FIBONAC2.PAS«} 0x21d00…21d20 20 20 20 20 20 20 20 20 20 20 66 6f 65 72 73 74 65 20 3a 3d 20 31 3b 0d 0a 20 20 20 20 20 20 20 ┆ foerste := 1; ┆ 0x21d20…21d40 20 20 20 20 20 20 20 6e 61 65 73 74 65 20 3a 3d 20 31 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 ┆ naeste := 1; ┆ 0x21d40…21d60 20 20 20 46 4f 52 20 69 20 3a 3d 20 33 20 54 4f 20 6e 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 20 ┆ FOR i := 3 TO n DO ┆ 0x21d60…21d80 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 20 20 20 ┆ BEGIN ┆ 0x21d80…21da0 67 65 6d 20 3a 3d 20 6e 61 65 73 74 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆gem := naeste; ┆ 0x21da0…21dc0 20 20 6e 61 65 73 74 65 20 3a 3d 20 66 6f 65 72 73 74 65 20 2b 20 6e 61 65 73 74 65 3b 0d 0a 20 ┆ naeste := foerste + naeste; ┆ 0x21dc0…21de0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 65 72 73 74 65 20 3a 3d 20 67 65 6d 3b ┆ foerste := gem;┆ 0x21de0…21e00 0d 0a 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 20 ┆ END; ┆ 0x21e00…21e20 (15, 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…] 0x22400…22600 (15, 1, 2) DataBlock {»GRUNDTAL.PAS«} […0x2…] 0x22980…229a0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x22a00…22c00 (15, 1, 5) DataBlock {»GRUNDTAL.PAS«} 0x22c00…22c20 (15, 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…] 0x22e00…23000 (15, 1, 7) DataBlock {»GRUNDTAL.PAS«} 0x23000…23020 (15, 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…] 0x23200…23400 (15, 1, 9) DataBlock {»GRUNDTAL.PAS«} 0x23400…23600 (16, 0, 1) DataBlock {»GAETTEGN.PAS«} 0x23600…23620 (16, 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…] 0x23800…23a00 (16, 0, 3) DataBlock {»GAETTEGN.PAS«} 0x23a00…23a20 (16, 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…] 0x23c00…23e00 (16, 0, 5) DataBlock {»GAETTEGN.PAS«} 0x23e00…23e20 (16, 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…] 0x24000…24200 (16, 0, 7) DataBlock {»GAETTEGN.PAS«} 0x24200…24400 (16, 0, 8) DataBlock {»HENTPOST.PAS«} 0x24400…24580 (16, 0, 9) DataBlock {»HARMONIC.PAS«} 0x24580…245a0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x24600…24800 (16, 1, 1) DataBlock {»HENTPOST.PAS«} 0x24800…24a00 (16, 1, 2) DataBlock {»HASHTAB.PAS«} 0x24a00…24b80 (16, 1, 3) DataBlock {»HENTPOST.PAS«} 0x24b80…24ba0 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x24c00…24e00 (16, 1, 4) DataBlock {»HASHTAB.PAS«} 0x24e00…24e20 (16, 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…] 0x25000…25200 (16, 1, 6) DataBlock {»HASHTAB.PAS«} […0x4…] 0x25a00…25c00 (17, 0, 2) DataBlock {»IDEAL.PAS«} 0x25c00…25d00 (17, 0, 3) DataBlock {»HASHTAB.PAS«} 0x25d00…25d20 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x25e00…26000 (17, 0, 4) DataBlock {»IDEAL.PAS«} […0x6…] 0x26c00…26e00 (17, 1, 2) DataBlock {»INTERHYP.PAS«} 0x26e00…26e80 (17, 1, 3) DataBlock {»IDEAL.PAS«} 0x26e80…26ea0 70 6f 65 72 67 20 2a 29 0d 0a 20 20 20 20 0d 0a 20 20 42 45 47 49 4e 20 28 2a 20 69 64 65 61 6c ┆poerg *) BEGIN (* ideal┆ 0x26ea0…26ec0 20 2a 29 0d 0a 20 20 20 20 52 45 50 45 41 54 0d 0a 20 20 20 20 20 20 66 6f 72 73 69 64 65 3b 0d ┆ *) REPEAT forside; ┆ 0x26ec0…26ee0 0a 20 20 20 20 20 20 73 70 6f 65 72 67 28 6b 6f 65 6e 2c 20 68 6f 65 6a 64 65 29 3b 0d 0a 20 20 ┆ spoerg(koen, hoejde); ┆ 0x26ee0…26f00 20 20 20 20 75 64 73 6b 72 69 66 74 28 6b 6f 65 6e 2c 20 68 6f 65 6a 64 65 29 3b 0d 0a 20 20 20 ┆ udskrift(koen, hoejde); ┆ 0x26f00…26f20 20 20 20 47 4f 54 4f 58 59 28 35 2c 20 32 30 29 3b 0d 0a 20 20 20 20 20 20 57 52 49 54 45 28 27 ┆ GOTOXY(5, 20); WRITE('┆ 0x26f20…26f40 5c 6e 73 6b 65 72 20 64 75 20 61 74 20 70 72 7c 76 65 20 69 67 65 6e 20 28 6a 2f 6e 29 3a 20 27 ┆Ønsker du at prøve igen (j/n): '┆ 0x26f40…26f60 29 3b 0d 0a 20 20 20 20 20 20 52 45 50 45 41 54 0d 0a 20 20 20 20 20 20 20 20 52 45 41 44 28 4b ┆); REPEAT READ(K┆ 0x26f60…26f80 42 44 2c 20 63 68 29 3b 0d 0a 20 20 20 20 20 20 55 4e 54 49 4c 20 63 68 20 49 4e 20 28 2e 27 4a ┆BD, ch); UNTIL ch IN (.'J┆ 0x26f80…26fa0 27 2c 20 27 6a 27 2c 20 27 4e 27 2c 20 27 6e 27 2e 29 3b 0d 0a 20 20 20 20 55 4e 54 49 4c 20 63 ┆', 'j', 'N', 'n'.); UNTIL c┆ 0x26fa0…26fc0 68 20 49 4e 20 28 2e 27 4e 27 2c 20 27 6e 27 2e 29 3b 0d 0a 20 20 20 20 47 4f 54 4f 58 59 28 35 ┆h IN (.'N', 'n'.); GOTOXY(5┆ 0x26fc0…26fe0 2c 20 32 31 29 3b 0d 0a 20 20 20 20 57 52 49 54 45 4c 4e 28 27 53 7d 20 73 6c 75 74 74 65 72 20 ┆, 21); WRITELN('Så slutter ┆ 0x26fe0…27000 76 69 20 66 6f 72 20 69 20 64 61 67 2e 27 29 3b 0d 0a 20 20 45 4e 44 2e 20 28 2a 20 69 64 65 61 ┆vi for i dag.'); END. (* idea┆ 0x27000…27200 (17, 1, 4) DataBlock {»INTERHYP.PAS«} 0x27200…27220 (17, 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…] 0x27400…27600 (17, 1, 6) DataBlock {»INTERHYP.PAS«} 0x27600…27620 (17, 1, 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…] 0x27800…27900 (17, 1, 8) DataBlock {»INTERHYP.PAS«} 0x27900…27920 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x17…] 0x27c00…27e00 (18, 0, 1) DataBlock {»INVERS.PAS«} 0x27e00…28000 (18, 0, 2) DataBlock {»IDENTIFI.PAS«} 0x28000…28200 (18, 0, 3) DataBlock {»INVERS.PAS«} 0x28200…28400 (18, 0, 4) DataBlock {»IDENTIFI.PAS«} 0x28400…28500 (18, 0, 5) DataBlock {»INVERS.PAS«} 0x28500…28520 e5 e5 e5 e5 e5 e5 e5 e5 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…] 0x28600…28800 (18, 0, 6) DataBlock {»IDENTIFI.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 {»IDENTIFI.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…29300 (18, 1, 3) DataBlock {»IDENTIFI.PAS«} 0x29300…29320 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆ […0x37…] 0x29a00…29c00 (18, 1, 7) DataBlock {»JOURNAL.PAS«} 0x29c00…29c20 (18, 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…] 0x29e00…2a000 (18, 1, 9) DataBlock {»JOURNAL.PAS«} 0x2a000…2a020 (19, 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 ┆ ┆ […0x131f…]