0 REM **********************›1 REM * L I N I E *›2 REM * (c) 1988 A. Biazik *›3 REM **********************›4 REM ›10 A=16384:RESTORE 100›20 FOR I=0 TO 68:S=0›30 FOR J=0 TO 9:READ B:POKE A+J,B:S=S+B:NEXT J:READ SUMA:IF SUMA<>S THEN 50›40 A=A+10:NEXT I:? "GOTOWE":END ›50 ? " BLAD DANYCH W LINII ";100+10*I:LIST 100+10*I:STOP ›100 DATA 104,169,26,141,48,2,169,64,141,49,913›110 DATA 2,169,7,133,87,169,0,133,88,169,957›120 DATA 145,133,89,76,158,64,112,112,112,77,1078›130 DATA 0,145,13,13,13,13,13,13,13,13,249›140 DATA 13,13,13,13,13,13,13,13,13,13,130›150 DATA 13,13,13,13,13,13,13,13,13,13,130›160 DATA 13,13,13,13,13,13,13,13,13,13,130›170 DATA 13,13,13,13,13,13,13,13,13,13,130›180 DATA 13,13,13,13,13,13,13,13,13,13,130›190 DATA 13,13,13,13,13,13,13,13,13,13,130›200 DATA 13,13,13,13,13,13,13,13,13,13,130›210 DATA 13,70,118,64,6,65,26,64,0,39,465›220 DATA 50,33,35,58,0,17,0,0,0,39,232›230 DATA 50,33,35,58,0,18,0,0,0,0,194›240 DATA 0,0,0,16,0,0,0,0,0,0,16›250 DATA 0,0,0,16,0,0,0,0,169,255,440›260 DATA 141,252,2,169,0,141,1,210,32,32,980›270 DATA 244,169,15,141,196,2,169,3,141,197,1277›280 DATA 2,169,9,141,198,2,169,3,141,251,1085›290 DATA 2,169,17,133,34,169,0,133,90,133,880›300 DATA 91,133,92,133,84,133,86,169,159,133,1213›310 DATA 85,32,175,249,169,79,133,84,32,175,1213›320 DATA 249,169,0,133,85,32,175,249,169,0,1261›330 DATA 133,84,32,175,249,169,1,141,251,2,1237›340 DATA 169,40,133,84,133,85,32,202,241,169,1288›350 DATA 2,141,251,2,169,40,133,84,169,120,1111›360 DATA 133,85,32,202,241,169,40,133,203,133,1371›370 DATA 204,133,206,169,120,133,205,169,8,133,1480›380 DATA 207,169,4,133,208,169,0,133,0,173,1196›390 DATA 120,2,73,15,133,4,240,30,41,12,670›400 DATA 240,14,133,4,165,207,41,3,240,18,1065›410 DATA 165,4,133,207,208,12,165,207,41,12,1154›420 DATA 240,6,165,4,41,3,133,207,173,121,1093›430 DATA 2,73,15,133,4,240,30,41,12,240,790›440 DATA 14,133,4,165,208,41,3,240,18,165,991›450 DATA 4,133,208,208,12,165,208,41,12,240,1231›460 DATA 6,165,4,41,3,133,208,165,207,41,973›470 DATA 1,240,2,198,204,165,207,41,2,240,1300›480 DATA 2,230,204,165,207,41,4,240,2,198,1293›490 DATA 203,165,207,41,8,240,2,230,203,165,1464›500 DATA 208,41,1,240,2,198,206,165,208,41,1310›510 DATA 2,240,2,230,206,165,208,41,4,240,1338›520 DATA 2,198,205,165,208,41,8,240,2,230,1299›530 DATA 205,165,203,197,205,208,21,165,204,197,1770›540 DATA 206,208,15,32,193,65,76,158,64,173,1190›550 DATA 132,2,45,133,2,208,248,96,165,203,1234›560 DATA 133,85,165,204,133,84,32,128,241,240,1445›570 DATA 3,76,94,66,165,205,133,85,165,206,1198›580 DATA 133,84,32,128,241,240,3,76,71,66,1074›590 DATA 165,203,133,85,165,204,133,84,169,1,1342›600 DATA 141,251,2,32,202,241,165,205,133,85,1457›610 DATA 165,206,133,84,169,2,141,251,2,32,1185›620 DATA 202,241,173,252,2,201,28,208,3,76,1386›630 DATA 170,194,169,255,141,252,2,169,163,141,1656›640 DATA 1,210,165,0,73,255,141,0,210,162,1217›650 DATA 10,164,0,234,234,234,234,234,234,234,1812›660 DATA 234,200,208,245,202,16,240,165,0,201,1711›670 DATA 200,240,2,230,0,169,160,141,1,210,1353›680 DATA 76,33,65,32,131,249,169,17,133,0,905›690 DATA 173,143,64,201,25,240,32,238,143,64,1323›700 DATA 32,193,65,76,158,64,32,131,249,169,1169›710 DATA 18,133,0,173,153,64,201,25,240,9,1016›720 DATA 238,153,64,32,193,65,76,158,64,169,1212›730 DATA 16,141,143,64,141,153,64,169,156,141,1188›740 DATA 112,64,169,66,141,113,64,165,0,141,1035›750 DATA 171,66,32,193,65,169,118,141,112,64,1131›760 DATA 169,64,141,113,64,76,158,64,0,0,849›770 DATA 55,57,39,50,33,44,0,39,50,33,400›780 DATA 35,58,0,0,0,0,0,0,0,0,93›