|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics
Length: 6720000 (0x668a00)
Names: »ppnothbigtx «
└─⟦01e83a425⟧ Bits:30008166 Bånd med SW8010 og SW8500 source code
└─⟦75ff9bef3⟧
└─⟦this⟧ »ppnothbigtx «
Dumping the first 0x20 bytes of each record 0x000000…001b00 (1, 2589) 6d 6f 64 65 20 6c 69 73 74 2e 79 65 73 0a 6e 6f 74 68 3d 61 6c 67 6f 6c 20 73 75 72 76 65 79 2e ┆mode list.yes noth=algol survey.┆ 0x001b00…003600 (1, 2590) 37 3b 0a 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 ┆7; for i := 1 step 1 until ┆ 0x003600…005100 (1, 2591) 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a ┆ 1 until 200 do i := 777; ┆ 0x005100…006c00 (1, 2592) 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 ┆ := 777; for i := 1 step 1 u┆ 0x006c00…008700 (1, 2593) 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 ┆ step 1 until 200 do i := ┆ 0x008700…00a200 (1, 2594) 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 ┆ i := 777; for i := 1 ste┆ 0x00a200…00bd00 (1, 2595) 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 ┆ := 1 step 1 until 200 do ┆ 0x00bd00…00d800 (1, 2596) 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 ┆do i := 777; for i := ┆ 0x00d800…00f300 (1, 2597) 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 ┆for i := 1 step 1 until 200 do ┆ 0x00f300…010e00 (1, 2598) 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 ┆ 200 do i := 777; for ┆ 0x010e00…012900 (1, 2599) 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 ┆ for i := 1 step 1 until 200┆ 0x012900…014400 (1, 2600) 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 ┆ until 200 do i := 777; ┆ 0x014400…015f00 (1, 2601) 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 ┆= 777; for i := 1 step 1 unt┆ 0x015f00…017a00 (1, 2602) 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 ┆tep 1 until 200 do i := 77┆ 0x017a00…019500 (1, 2603) 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 ┆ i := 777; for i := 1 step ┆ 0x019500…01b000 (1, 2604) 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 ┆= 1 step 1 until 200 do i ┆ 0x01b000…01cb00 (1, 2605) 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 ┆ i := 777; for i := 1 ┆ 0x01cb00…01e600 (1, 2606) 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 ┆r i := 1 step 1 until 200 do ┆ 0x01e600…020100 (1, 2607) 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 ┆00 do i := 777; for i ┆ 0x020100…021c00 (1, 2608) 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 ┆ for i := 1 step 1 until 200 d┆ 0x021c00…023700 (1, 2609) 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 0a 20 20 20 20 ┆til 200 do i := 777; ┆ 0x023700…025200 (1, 2610) 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c ┆777; for i := 1 step 1 until┆ 0x025200…026d00 (1, 2611) 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b ┆p 1 until 200 do i := 777;┆ 0x026d00…028800 (1, 2612) 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 ┆i := 777; for i := 1 step 1 ┆ 0x028800…02a300 (1, 2613) 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d ┆1 step 1 until 200 do i :=┆ 0x02a300…02be00 (1, 2614) 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 ┆ i := 777; for i := 1 st┆ 0x02be00…02d900 (1, 2615) 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 ┆i := 1 step 1 until 200 do ┆ 0x02d900…02f400 (1, 2616) 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d ┆ do i := 777; for i :=┆ 0x02f400…030f00 (1, 2617) 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a ┆ for i := 1 step 1 until 200 do ┆ 0x030f00…032a00 (1, 2618) 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 ┆l 200 do i := 777; for┆ 0x032a00…034500 (1, 2619) 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 ┆7; for i := 1 step 1 until 2┆ 0x034500…036000 (1, 2620) 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 ┆1 until 200 do i := 777; ┆ 0x036000…037b00 (1, 2621) 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e ┆:= 777; for i := 1 step 1 un┆ 0x037b00…039600 (1, 2622) 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 ┆step 1 until 200 do i := 7┆ 0x039600…03b100 (1, 2623) 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 ┆ i := 777; for i := 1 step┆ 0x03b100…03cc00 (1, 2624) 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 ┆:= 1 step 1 until 200 do i┆ 0x03cc00…03e700 (1, 2625) 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 ┆o i := 777; for i := 1┆ 0x03e700…040200 (1, 2626) 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 ┆or i := 1 step 1 until 200 do ┆ 0x040200…041d00 (1, 2627) 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 ┆200 do i := 777; for i┆ 0x041d00…043800 (1, 2628) 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 ┆ for i := 1 step 1 until 200 ┆ 0x043800…045300 (1, 2629) 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 ┆until 200 do i := 777; ┆ 0x045300…046e00 (1, 2630) 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 ┆ 777; for i := 1 step 1 unti┆ 0x046e00…048900 (1, 2631) 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 ┆ep 1 until 200 do i := 777┆ 0x048900…04a400 (1, 2632) 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 ┆ i := 777; for i := 1 step 1┆ 0x04a400…04bf00 (1, 2633) 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a ┆ 1 step 1 until 200 do i :┆ 0x04bf00…04da00 (1, 2634) 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 ┆ i := 777; for i := 1 s┆ 0x04da00…04f500 (1, 2635) 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 ┆ i := 1 step 1 until 200 do ┆ 0x04f500…051000 (1, 2636) 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a ┆0 do i := 777; for i :┆ 0x051000…052b00 (1, 2637) 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f ┆ for i := 1 step 1 until 200 do┆ 0x052b00…054600 (1, 2638) 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 ┆til 200 do i := 777; f┆ 0x054600…056100 (1, 2639) 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 ┆77; for i := 1 step 1 until ┆ 0x056100…057c00 (1, 2640) 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a ┆ 1 until 200 do i := 777; ┆ 0x057c00…059700 (1, 2641) 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 ┆ := 777; for i := 1 step 1 u┆ 0x059700…05b200 (1, 2642) 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 ┆ step 1 until 200 do i := ┆ 0x05b200…05cd00 (1, 2643) 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 ┆ i := 777; for i := 1 ste┆ 0x05cd00…05e800 (1, 2644) 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 ┆ := 1 step 1 until 200 do ┆ 0x05e800…060300 (1, 2645) 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 ┆do i := 777; for i := ┆ 0x060300…061e00 (1, 2646) 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 ┆for i := 1 step 1 until 200 do ┆ 0x061e00…063900 (1, 2647) 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 ┆ 200 do i := 777; for ┆ 0x063900…065400 (1, 2648) 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 ┆; for i := 1 step 1 until 20┆ 0x065400…066f00 (1, 2649) 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 ┆ until 200 do i := 777; ┆ 0x066f00…068a00 (1, 2650) 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 ┆= 777; for i := 1 step 1 unt┆ 0x068a00…06a500 (1, 2651) 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 ┆tep 1 until 200 do i := 77┆ 0x06a500…06c000 (1, 2652) 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 ┆ i := 777; for i := 1 step ┆ 0x06c000…06db00 (1, 2653) 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 ┆= 1 step 1 until 200 do i ┆ 0x06db00…06f600 (1, 2654) 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 ┆ i := 777; for i := 1 ┆ 0x06f600…071100 (1, 2655) 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 ┆r i := 1 step 1 until 200 do ┆ 0x071100…072c00 (1, 2656) 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 ┆00 do i := 777; for i ┆ 0x072c00…074700 (1, 2657) 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 ┆ for i := 1 step 1 until 200 ┆ 0x074700…076200 (1, 2658) 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 ┆ntil 200 do i := 777; ┆ 0x076200…077d00 (1, 2659) 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c ┆777; for i := 1 step 1 until┆ 0x077d00…079800 (1, 2660) 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b ┆p 1 until 200 do i := 777;┆ 0x079800…07b300 (1, 2661) 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 ┆i := 777; for i := 1 step 1 ┆ 0x07b300…07ce00 (1, 2662) 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d ┆1 step 1 until 200 do i :=┆ 0x07ce00…07e900 (1, 2663) 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 ┆ i := 777; for i := 1 st┆ 0x07e900…080400 (1, 2664) 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 ┆i := 1 step 1 until 200 do ┆ 0x080400…081f00 (1, 2665) 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d ┆ do i := 777; for i :=┆ 0x081f00…083a00 (1, 2666) 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a ┆ for i := 1 step 1 until 200 do ┆ 0x083a00…085500 (1, 2667) 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f ┆il 200 do i := 777; fo┆ 0x085500…087000 (1, 2668) 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 ┆7; for i := 1 step 1 until 2┆ 0x087000…088b00 (1, 2669) 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 ┆1 until 200 do i := 777; ┆ 0x088b00…08a600 (1, 2670) 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e ┆:= 777; for i := 1 step 1 un┆ 0x08a600…08c100 (1, 2671) 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 ┆step 1 until 200 do i := 7┆ 0x08c100…08dc00 (1, 2672) 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 ┆ i := 777; for i := 1 step┆ 0x08dc00…08f700 (1, 2673) 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 ┆:= 1 step 1 until 200 do i┆ 0x08f700…091200 (1, 2674) 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 ┆o i := 777; for i := 1┆ 0x091200…092d00 (1, 2675) 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 ┆or i := 1 step 1 until 200 do ┆ 0x092d00…094800 (1, 2676) 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 0a 20 20 20 20 66 6f 72 20 ┆200 do i := 777; for ┆ 0x094800…096300 (1, 2677) 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 ┆ for i := 1 step 1 until 200┆ 0x096300…097e00 (1, 2678) 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 ┆until 200 do i := 777; ┆ 0x097e00…099900 (1, 2679) 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 ┆ 777; for i := 1 step 1 unti┆ 0x099900…09b400 (1, 2680) 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 ┆ep 1 until 200 do i := 777┆ 0x09b400…09cf00 (1, 2681) 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 ┆ i := 777; for i := 1 step 1┆ 0x09cf00…09ea00 (1, 2682) 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a ┆ 1 step 1 until 200 do i :┆ 0x09ea00…0a0500 (1, 2683) 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 ┆ i := 777; for i := 1 s┆ 0x0a0500…0a2000 (1, 2684) 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 ┆ i := 1 step 1 until 200 do ┆ 0x0a2000…0a3b00 (1, 2685) 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a ┆0 do i := 777; for i :┆ 0x0a3b00…0a5600 (1, 2686) 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 ┆ for i := 1 step 1 until 200 d┆ 0x0a5600…0a7100 (1, 2687) 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 ┆til 200 do i := 777; f┆ 0x0a7100…0a8c00 (1, 2688) 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 ┆77; for i := 1 step 1 until ┆ 0x0a8c00…0aa700 (1, 2689) 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a ┆ 1 until 200 do i := 777; ┆ 0x0aa700…0ac200 (1, 2690) 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 ┆ := 777; for i := 1 step 1 u┆ 0x0ac200…0add00 (1, 2691) 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 ┆ step 1 until 200 do i := ┆ 0x0add00…0af800 (1, 2692) 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 ┆ i := 777; for i := 1 ste┆ 0x0af800…0b1300 (1, 2693) 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 ┆ := 1 step 1 until 200 do ┆ 0x0b1300…0b2e00 (1, 2694) 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 ┆do i := 777; for i := ┆ 0x0b2e00…0b4900 (1, 2695) 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 ┆for i := 1 step 1 until 200 do ┆ 0x0b4900…0b6400 (1, 2696) 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 ┆l 200 do i := 777; for┆ 0x0b6400…0b7f00 (1, 2697) 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 ┆; for i := 1 step 1 until 20┆ 0x0b7f00…0b9a00 (1, 2698) 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 ┆ until 200 do i := 777; ┆ 0x0b9a00…0bb500 (1, 2699) 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 ┆= 777; for i := 1 step 1 unt┆ 0x0bb500…0bd000 (1, 2700) 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 ┆tep 1 until 200 do i := 77┆ 0x0bd000…0beb00 (1, 2701) 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 ┆ i := 777; for i := 1 step ┆ 0x0beb00…0c0600 (1, 2702) 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 ┆= 1 step 1 until 200 do i ┆ 0x0c0600…0c2100 (1, 2703) 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 ┆ i := 777; for i := 1 ┆ 0x0c2100…0c3c00 (1, 2704) 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 ┆r i := 1 step 1 until 200 do ┆ 0x0c3c00…0c5700 (1, 2705) 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 ┆200 do i := 777; for i┆ 0x0c5700…0c7200 (1, 2706) 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 ┆ for i := 1 step 1 until 200 ┆ 0x0c7200…0c8d00 (1, 2707) 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 ┆ntil 200 do i := 777; ┆ 0x0c8d00…0ca800 (1, 2708) 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c ┆777; for i := 1 step 1 until┆ 0x0ca800…0cc300 (1, 2709) 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b ┆p 1 until 200 do i := 777;┆ 0x0cc300…0cde00 (1, 2710) 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 ┆i := 777; for i := 1 step 1 ┆ 0x0cde00…0cf900 (1, 2711) 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d ┆1 step 1 until 200 do i :=┆ 0x0cf900…0d1400 (1, 2712) 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 ┆ i := 777; for i := 1 st┆ 0x0d1400…0d2f00 (1, 2713) 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 ┆i := 1 step 1 until 200 do ┆ 0x0d2f00…0d4a00 (1, 2714) 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d ┆ do i := 777; for i :=┆ 0x0d4a00…0d6500 (1, 2715) 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f ┆ for i := 1 step 1 until 200 do┆ 0x0d6500…0d8000 (1, 2716) 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f ┆il 200 do i := 777; fo┆ 0x0d8000…0d9b00 (1, 2717) 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 ┆7; for i := 1 step 1 until 2┆ 0x0d9b00…0db600 (1, 2718) 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 ┆1 until 200 do i := 777; ┆ 0x0db600…0dd100 (1, 2719) 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e ┆:= 777; for i := 1 step 1 un┆ 0x0dd100…0dec00 (1, 2720) 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 ┆step 1 until 200 do i := 7┆ 0x0dec00…0e0700 (1, 2721) 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 ┆ i := 777; for i := 1 step┆ 0x0e0700…0e2200 (1, 2722) 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 ┆:= 1 step 1 until 200 do i┆ 0x0e2200…0e3d00 (1, 2723) 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 ┆o i := 777; for i := 1┆ 0x0e3d00…0e5800 (1, 2724) 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 ┆for i := 1 step 1 until 200 do ┆ 0x0e5800…0e7300 (1, 2725) 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 ┆ 200 do i := 777; for ┆ 0x0e7300…0e8e00 (1, 2726) 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 ┆ for i := 1 step 1 until 200┆ 0x0e8e00…0ea900 (1, 2727) 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 ┆until 200 do i := 777; ┆ 0x0ea900…0ec400 (1, 2728) 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 ┆ 777; for i := 1 step 1 unti┆ 0x0ec400…0edf00 (1, 2729) 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 ┆ep 1 until 200 do i := 777┆ 0x0edf00…0efa00 (1, 2730) 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 ┆ i := 777; for i := 1 step 1┆ 0x0efa00…0f1500 (1, 2731) 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a ┆ 1 step 1 until 200 do i :┆ 0x0f1500…0f3000 (1, 2732) 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 ┆ i := 777; for i := 1 s┆ 0x0f3000…0f4b00 (1, 2733) 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 ┆ i := 1 step 1 until 200 do ┆ 0x0f4b00…0f6600 (1, 2734) 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 ┆00 do i := 777; for i ┆ 0x0f6600…0f8100 (1, 2735) 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 ┆ for i := 1 step 1 until 200 d┆ 0x0f8100…0f9c00 (1, 2736) 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 ┆til 200 do i := 777; f┆ 0x0f9c00…0fb700 (1, 2737) 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 ┆77; for i := 1 step 1 until ┆ 0x0fb700…0fd200 (1, 2738) 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a ┆ 1 until 200 do i := 777; ┆ 0x0fd200…0fed00 (1, 2739) 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 ┆ := 777; for i := 1 step 1 u┆ 0x0fed00…100800 (1, 2740) 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 ┆ step 1 until 200 do i := ┆ 0x100800…102300 (1, 2741) 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 ┆ i := 777; for i := 1 ste┆ 0x102300…103e00 (1, 2742) 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 ┆ := 1 step 1 until 200 do ┆ 0x103e00…105900 (1, 2743) 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d ┆do i := 777; for i :=┆ 0x105900…107400 (1, 2744) 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a ┆ for i := 1 step 1 until 200 do ┆ 0x107400…108f00 (1, 2745) 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 ┆l 200 do i := 777; for┆ 0x108f00…10aa00 (1, 2746) 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 ┆; for i := 1 step 1 until 20┆ 0x10aa00…10c500 (1, 2747) 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 ┆ until 200 do i := 777; ┆ 0x10c500…10e000 (1, 2748) 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 ┆= 777; for i := 1 step 1 unt┆ 0x10e000…10fb00 (1, 2749) 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 ┆tep 1 until 200 do i := 77┆ 0x10fb00…111600 (1, 2750) 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 ┆ i := 777; for i := 1 step ┆ 0x111600…113100 (1, 2751) 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 ┆= 1 step 1 until 200 do i ┆ 0x113100…114c00 (1, 2752) 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 ┆ i := 777; for i := 1 ┆ 0x114c00…116700 (1, 2753) 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 ┆or i := 1 step 1 until 200 do ┆ 0x116700…118200 (1, 2754) 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 ┆200 do i := 777; for i┆ 0x118200…119d00 (1, 2755) 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 ┆ for i := 1 step 1 until 200 ┆ 0x119d00…11b800 (1, 2756) 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 ┆ntil 200 do i := 777; ┆ 0x11b800…11d300 (1, 2757) 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c ┆777; for i := 1 step 1 until┆ 0x11d300…11ee00 (1, 2758) 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b ┆p 1 until 200 do i := 777;┆ 0x11ee00…120900 (1, 2759) 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 ┆i := 777; for i := 1 step 1 ┆ 0x120900…122400 (1, 2760) 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d ┆1 step 1 until 200 do i :=┆ 0x122400…123f00 (1, 2761) 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 ┆ i := 777; for i := 1 st┆ 0x123f00…125a00 (1, 2762) 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 ┆i := 1 step 1 until 200 do ┆ 0x125a00…127500 (1, 2763) 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a ┆0 do i := 777; for i :┆ 0x127500…129000 (1, 2764) 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f ┆ for i := 1 step 1 until 200 do┆ 0x129000…12ab00 (1, 2765) 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f ┆il 200 do i := 777; fo┆ 0x12ab00…12c600 (1, 2766) 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 ┆7; for i := 1 step 1 until 2┆ 0x12c600…12e100 (1, 2767) 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 ┆1 until 200 do i := 777; ┆ 0x12e100…12fc00 (1, 2768) 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e ┆:= 777; for i := 1 step 1 un┆ 0x12fc00…131700 (1, 2769) 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 ┆step 1 until 200 do i := 7┆ 0x131700…133200 (1, 2770) 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 ┆ i := 777; for i := 1 step┆ 0x133200…134d00 (1, 2771) 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 ┆:= 1 step 1 until 200 do i┆ 0x134d00…136800 (1, 2772) 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 ┆do i := 777; for i := ┆ 0x136800…138300 (1, 2773) 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 ┆for i := 1 step 1 until 200 do ┆ 0x138300…139e00 (1, 2774) 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 ┆ 200 do i := 777; for ┆ 0x139e00…13b900 (1, 2775) 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 ┆ for i := 1 step 1 until 200┆ 0x13b900…13d400 (1, 2776) 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 ┆until 200 do i := 777; ┆ 0x13d400…13ef00 (1, 2777) 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 ┆ 777; for i := 1 step 1 unti┆ 0x13ef00…140a00 (1, 2778) 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 ┆ep 1 until 200 do i := 777┆ 0x140a00…142500 (1, 2779) 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 ┆ i := 777; for i := 1 step 1┆ 0x142500…144000 (1, 2780) 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a ┆ 1 step 1 until 200 do i :┆ 0x144000…145b00 (1, 2781) 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 ┆ i := 777; for i := 1 s┆ 0x145b00…147600 (1, 2782) 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 ┆r i := 1 step 1 until 200 do ┆ 0x147600…149100 (1, 2783) 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 ┆00 do i := 777; for i ┆ 0x149100…14ac00 (1, 2784) 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 ┆ for i := 1 step 1 until 200 d┆ 0x14ac00…14c700 (1, 2785) 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 ┆til 200 do i := 777; f┆ 0x14c700…14e200 (1, 2786) 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 ┆77; for i := 1 step 1 until ┆ 0x14e200…14fd00 (1, 2787) 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 37 37 37 3b 0a ┆ 1 until 200 do i := 777; ┆ 0x14fd00…151800 (1, 2788) 20 3a 3d 20 37 37 37 3b 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 ┆ := 777; for i := 1 step 1 u┆ 0x151800…153300 (1, 2789) 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 30 30 20 64 6f 0a 20 20 20 20 20 20 69 20 3a 3d 20 ┆ step 1 until 200 do i := ┆ […truncated at 200 lines…]