MATMA ddtf 50000P "" >(23631O\+256*23632P\+5),111o:"" "" M4 @!<<<< < <?<<<<0< <0< <  << <~0?<?< < < << 3< <<<0< <0< <  << <0 `>|<?<?< < < << 3< ??< < |><~<<|d<|><>><||0Xjb?<<0??<?< < < << 3< ??< < bXb b20d bbXbFXbj`0jb?<<0?<<<< ? < << ???< < b~~20d ~bbFbj`2jb?<<0?<<<< ? < << ?b`0`22d `bb>bj`j?<<<< < <?<<<<< ? < << ?|>~>2>L>|<?j<<<< < <?<<<<0< <0< <  << <`8`<88888888888888888888888888888888888999998888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888::::::::::::::::::::88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888M3 x1P)![y٧ʍyʯŠÊw#zÊ{/@Wy/O{[!~:<2 W P P M۱3ML3j26e3- "v[)>66$ >(> > <`<< 0> 0`<0 0 >>0 0bb~bbb<<F<dhphdb`````~bvjbbbbrjfbbFFF>0<000>FF><`|bbbb0002 L8`bdxdb00002|jjjj<2222FFF>>X<`<<0|002dddd>bbv<jjjj<b4,FFFF><~ 0~ <2222~ 0~`hp``~~ 0~??:::::::::::::::::::::::::::::::::33+))))))))****())......))))))::33+)))))))))*2*)))....((/*)),::33;+)))))))))(2**)))..((88/)),::3+))))))))))**))))))(888(), ::,,,,,,,,,,,,,,,,,(888(,, ::# "" %% 88:<" :: #"2" &&&&&&&&& '':8:8" ::  #" &&&&&&0 '':::::""$:: # &&&&04 ''<:899 ! ::# &&& !98! ::;;;;;;# && 99! ::;;;;;## &&6&&& !! ::###### &&&&&&&&&& :: & &&&&&& :::::::::::::::::::::::::::::::::?*x??*??*pHH@ @@@@@@@@@@@@@@@UUUUUU PU|T?PU??T?DPU " @D $pTP * ?*|` ??* 8A*x $/ ?TTTTTTTTTTTTTTTUUUUP? T~ 08T?T5T??T0 "~!T?|T*****************< *~*?**?*?~0 *|UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUPU8p7T0 P?T?P߁<8@T#P? |T*8pa *?m ?*?~ |?B *?|UUUUUUUUUUUUUUUUUUUUUUUUUUUUUU@UPT?@U?T8@U?T~p@U?|T*8<@B*?D*?P? @*?~I UdD<T B?PUT$PU??(  TPUF@TUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU*D?< D*@ !*?$8@ ?*FF?T D?T T$T"D T?TTUTUTUTUTUTUTUTUTUTUTUTUTUTUTUT**X* H**?@*? ****************? P?`T?pDP?T)*@PP?TPPPPPPPPPPPPPPPP A!*`?@ P* )D *H~ A@U ? TX@U??TI@?@UHT?@![~#"[o<&)))K6\ >2[: [2 [: [2[> 2[~#"[2[:[= 2:[= :[G: [O: [ 2 [*[2[: [G: [2 [*[ 2[: [G: [2[: [Oͤ:[<2[ :[<2[ :[0@ :\G:\G:[o:[g>Xg:\w:[G@gxgxo:[Go!xO F![F(// PM2[x2[y2[z2[{2[|2[}2[!@:[o:[g:[_:[W:[O:[G:[ANTSOFT~@|@@~~@|@@@>BB<DHpHDB@@@@@~BfZBBBBbRJFB7V0V{[![&>7V " ":(9S\+8*9T\) M1 [[Ѓ`MATMASoftware}M0 &[&0NN# @̈́8&]+];]]W~\\0`0aX![!HP!!88  K S PMATMA B##$;<- <]̈́! C?P? K SR Pnx=23500[23504[:b:x,b:x:e=23613=\+256*23614>\:e,214:e+1,91[ 1205,125},27,24,251 c50000P:59390:e=23613=\+256*23614>\:e,214:e+1,91[ gj=1 '7:7:0::35# v:"Czy bawisz si# jeszcze raz ?"'''"Je%li tak naci%nij klawisz T ."''"W przeciwnym razie dowolny inny."''' .1000:x=84Tx=116t30 :2;1;"Czy na pewno chcesz sko|czy& ?";0'''"Je%li tak naci%nij klawisz T ."''"W przeciwnym razie dowolny inny.";0 .1000:x84Tx116t30 P:d$="DO WIDZENIA":xs=2:ys=3:y=80P:3010 :5000  0 Z:d$="Ciesz# si# !":xs=2:ys=3:y=24:3010 :'''''''"":62> #236077\,231 $^d$="MAGNETOFON STOP":Y=80P:XS=2:YS=3:3010 :5000:2000 %h1,3;1;"Firma":d$="ELKOR Software":xs=2:ys=3:y=24:3010 'w7,3;2;"prezentuje program :";0:d$="MATMA":xs=4:ys=5:y=96`:3010 ) 5000 - 2000 8x$(4,11 ):x$(1)=" dodawanie ":x$(2)="odejmowanie":x$(3)=" mnoenie ":x$(4)=" dzielenie " <0,10 ;2;" WITAJ !!! ";0'''"Zapraszam do zabawy."''"Jest to zabawa arytmetyczna."''1;"Z nagrod@ za wytrwa`o%& !!!";0'' @5200P:n=3 Dz$="je%li ":y$="naci%nij " Fa(512):x=132 :a(x)=3:x:x=33!44932 :a(x)=3:x:x=64@48032 :a(x)=3:x:x=481512:a(x)=3:x G'"Jakie dzia`anie wybierasz ";1;"?";0''" ";z$;x$(1);" - ";y$;"+"''" ";z$;x$(2);" - ";y$;"-"''" ";z$;x$(3);" - ";y$;"*"''" ";z$;x$(4);" - ";y$;":" PF1000:x=43+x=107kx=75Kdz=1:130 Z:x=45-x=106jx=74Jdz=2:130 d9x=42*x=98bx=66Bdz=3:130 n:x=58:x=90Zx=122zdz=4:130 x21,0;31;" ":.5,-42*:21,0;2;"Naci%nij +, -, * lub : ";1;"!";0;0:.05|L,47/:80P ^:10 ,5;"Wybrali%my ";x$(dz);".":.03{u\,40(:5:.2~L,20 2000 yu$(4,9 ):u$(1)=" dodawa& ":u$(2)="odejmowa&":u$(3)=" mnoy& ":u$(4)=" dzieli& " av$(3,5):v$(1)="jedno":v$(2)=" dwu":v$(3)=" trzy":q$="cyfrow" ''''" Skoro lubisz ";x$(dz)''"to odpowiedz jakie liczby"''"potrafisz ";u$(dz);" ";2;1;"?";0;0 }''" ";z$;v$(1);q$;"e - ";y$;"1"''" ";z$;v$(2);q$;"e - ";y$;"2"''" ";z$;v$(3);q$;"e - ";y$;"3" /1000:x=491li=1:230 #x=502li=2:230 #x=513li=3:230 ܡ18,0;31;" ":.5,-42*:18,0;"Naci%nij 1 , 2 lub 3 ";1;"!";0:.05|L,47/:190 z:10 ,5;"Wybrali%my ";x$(dz)''" liczb ";v$(li);q$;"ych.":.03{u\,40(:5:.2~L,20 2000 ''"Teraz ja b#d# uk`ada& dla Ciebie"''"zadania a Ty b#dziesz na nie od-"''"powiada&. Oczywi%cie b#dzie to"'';"jak ustalili%my ";x$(dz)''"liczb ";v$(li);q$;"ych ." ''"Odpowiadaj prosz# na pytania"''"naciskaj@c odpowiednie cyfry."''"Jeeli uznasz wpisan@ liczb# za"''"prawid`ow@ naci%nij ENTER ."  2000 s'''"Gdyby zosta`a wpisana z`a cyfra"''"to moesz j@ wymaza& naciskaj@c"''"dowoln@ liter@ za wyj@tkiem X ." g''"Naci%ni%cie X spowoduje powr_t"''"do pocz@tku programu."'''"Zabawa rozpocznie si# od nowa !" ' 2000 ,3,0;"Kada prawid`owa odpowied} zbli-"''"a Ci# o krok do nagrody."''"Kada z`a cofa o p_` kroku."'2'"Od nagrody dzieli Ci# dziesi#&"''"krok_w."''5'"Z";1;8;"\YCZE";8;"{ POWODZENIA I WYTRWA~OS";8;"\CI!!";0 0Cy=140:d$="ZX Spectrum":xs=2:ys=3:3010 6 2000 8 5200P ;=#0;1,0;" Prosz# poczekaj chwil# . " @)x=22528X23039Y:x,0:x Opp=65325- Tx=1512 Y.a(x)=322527W+x,(60415+x) ^x ``f=0:u$(4):u$(1)="+":u$(2)="-":u$(3)="*":u$(4)=":" at$(5,16):t$(1)=" BARDZO DOBRZE !":t$(2)=" WSPANIALE ! ":t$(3)=" ZNAKOMICIE ! ":t$(4)=" DOSKONALE ! ":t$(5)=" TAK ! " c>#0;1,0;"Przygotowuj# zadanie dla Ciebie." h4000+10 *dz r.d$=" ":x=0:2900T |;d$=p+u$(dz)+n+"=":x=16*(8-d$):2900T C17,0;1;"X -powr_t.Inna litera kasowanie." "fl=0:c=0:e=0 V#0;1,0;" Wpisz liczb#. Zako|cz ENTER .":.05|L,47/ .1000:x=88Xx=120x20 x=13 fl500 "x<480x>579550& /fl=1:c=c+1:c>8580D 7e=e*10 +x-480:d$=x:2800 :410 w=e520 &d$=" ?! ":c=1:2800 17,0;31;" ":#0;1,0;31;" ":1,-30:1,-40(:1,-502:#0;1,0;"B`@d.Powinno by& "+p+u$(dz)+n+"="+w:200:700 #0;1,0;31;" ":17,0;31;" ":d$=t$(1+(*5)):xs=2:ys=3:y=152:3010  J#0;1,0;" ":5000  600X &"c=0fl=0:410 +=d$=" ":2800 :c=c-1:e=(e/10 ):410 Dc=c-1:#0;1,0;" Wynik napewno ma mniej cyfr ! ":y=184:.5,-42*:.05|L,47/:200:395: X ]x=142* by=(*448+33!) la(y)=0650 p&y=y+1:y>480y=33! s 620l x  355c S22527W+y,(60415+y):f=f+1:a(y)=1:f>397670  640 x=33!480 .a(x)=022527W+x,(60415+x) x  800  f=0355c x=121 y=(*448+33!) a(y)1750 H22527W+y,0:f=f-1:a(y)=0:f=0355c x  355c &y=y+1:y>480y=33!  720  Hd$=" GRATULACJE ! ":xs=2:ys=3:y=152:3010 *\16,0;2;"Widz#, e ";x$(dz);" liczb"'v$(li);q$;"ych";" masz opanowane." 4 5100 >2000:20 23560\,0 'x=23560\:x=01002 .05|L,38&: H#0;1,3;"Naci%nij dowolny klawisz !":1000:: x=16*(7+c) T1xs=2:ys=3:y=152:3020 xs=1:ys=1 &x=(256-xs*8*d$)/2 ̝a=23306 [:a,x:a+1,y:a+2,xs:a+3,ys:a+4,8:a=a+4:i=1̱d$:a+i,d$(i):i:a+i,255:pp=65024: 3p=(*10 ^li):p=0p=(*10 ^li)  +4000:n=(*(10 ^li)):w=p+n: ?3990:n=(*(p+1)):n=0n=(*(p+1))  w=p-n: "x=10 ^li:p=(*x+1) 5x=x/p:n=(*x):n<2*(10 ^li)n=(*x) .((10 *)/2)=04035 x=p:p=n:n=x  w=p*n: #4030:n=04040 x=p:p=w:w=x: gj=05020 0:.2~L,0:1:.2~L,2:2:.2~L,4:3:.2~L,5:4:.2~L,7:5:.2~L,9 :6:.2~L,11 :7:.2~L,12 gj=0: .2~L,12 :6:.2~L,11 :5:.2~L,9 :4:.2~L,7:3:.2~L,5:2:.2~L,4:1:.2~L,2:0:.2~L,0:7 gj=1: x=13  5130  )y=119:a,b:b/9 ,a:y x   37,2,12 ,4,11 ,2,2,4,0,2,9 ,4,7,2,0,4,0,2,2,2,4,2,7,2,5,2,5,2,5,2,7,2,9 ,2,9 ,2,7,4 P.15~,24:2.5 :.353333,21:2.5 :.15~,21:2.5 :.15~,22:2.5 :.15~,24:2.5 :.15~,33!:2.5 :.15~,33!:2.5 :.4L,29 Z ey`x@a[ DMATMA i,91[ ?y9GO?:\!6LD&!(?(}