Bulls-Co 'e:,~!\![~#"[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(// P $$$~$$~$>(> >ҵUUUU  >>> < >>BB>b|BB|@@<T8T|B|BB|@@|BB|BBrJJr` <""<LRrRL"< <"<$$$$>$$$~B"< ***> """&*2""&*2""$8$"2"6*"""">""""">""""" 2<""<  >""****<"<"< <"<BBrJr88"***><<DTTT~""` <"< 2kl== 53""150" q=q$ <"5e3*(q=n1)+1e3*(q=n2)+3e3*(q=n3)+5500*(q=n4)+500*(q=n5)"  "Zadumannoe ~islo wwoditigrok :"4e3":s,n0:n0,"175" 5n1,n1;" UKAZANIE DLQ ";n2,n1;" ZAGADYWA@]EGO" n4,n4;"Zadumajte i";n5,n1;"wwedite w kom-";n6,n1;"px`ter kombi-";n7,n1;"naci` iz l`byh";n8,n1;"4-h razli~nyh";n9,n1;"cifr"  w1:a$=x$ LOtgadywanie ~isla Qn=n1n9:n,n1;s$:n5:n V;n1,n1;"% ^ISLO REZ-T":n0,"158":s,n0:n0,"156":s,n0 `3n1,l;" UKAZANIE DLQ ";n2,l;"OTGADYWA@]EGO " jtn4,l;" Ugadajte za-";n5,l;"dumannu` kom-";n6,l;"binaci` cifr,";n7,l;"wwodq dlq |to-";n8,l;"go po 4 cifry." tj=n0:y$="":z$="":q=n1 ~!j=j+n1:p="2+j-18*(j/18-.01)" w1:y$=y$+x$ p,q;j;q+n3;x$; $b=n0:n=n1n4:x$(n)=a$(n)b=b+n1 n 9b=n4q+n9;"4b-0k":z$=z$+"4b-0k":"100":"1800" -k=n0:n=n1n4:m=n1n4:x$(m)=a$(n)k=k+n1 m:n !m$=b+"b-"+(k-b)+"k":z$=z$+m$  q+n9;m$ p<"20""1150" ^#n0;n1,n0;"Sdaetesx? ( =da, =net)":lat:#n0;n1,"12";"Y";n1,"18";"N":rus:n0 q$=:q$"y"q$"n""1250" q$="y"dw=n1:"1800" a=j/"36":b=a-a  b=n0q=n1:t=n0:"1310"  q=l:t=s bn1,q;"% ^ISLO REZ-T";n2,q;s$:t,"158":s,n0:t,"156":s,n0:n=n3̰"20":n,q;s$:n:"1150" < Wywod zadumannogo ~isla 5n5::d$="Bylo zadumano":xs=n2:ys=n4:y="10":dd *n1:d$=a$:xs=n5:ys=n8:y="50":dd:n0 !dw=n1"1890" &'r$="ok":"j>10j<15"j$=j:"1870" 0j$=j:a=j$(j$) :a=n1r$="ku" Da>n1a57"#n0;n0,n0;" Wwodite tolxko cifry ":w2:w1 n \m=n1n3:n=mn3:x$(m)=x$(n+n1)#n0;n0,n0;"Wse cifry dolvny bytx razli~nymi":w2:w1 n:m  Zagadywaet kompx`ter a(n4):a(n1)=(n9*) n=n2n4 a(n)=(n9*):m=n1n-n1 a(n)=a(m)"3030" m:n a$="":n=n1n4:a$=a$+a(n):n *:"4000":"127",n0:n0,"175":"1110" 7n0,n0:n0,"175":"255",n0:n0,"-175":"-255",n0: Poqsneniq k igre :n1,n8;"POQSNENIQ K IGRE:" o'" Celx igry - ugadatx 4-zna~noe~islo, zadumannoe partnerom, ko-torym movet bytx 2-oj igrok ilikompx`ter." j" Kompx`ter srawniwaet hranq}ee-sq w ego pamqti ~islo s ~islom,wwodimym w nego otgadywa`}im ig-rokom." `" Wse ~isla dolvny bytx sostaw-leny iz raznyh cifr, pri~em na1-om meste movet stoqtx i 0." " Esli zadumannoe i nazwannoe~isla ime`t ob}ie cifry, stoq}iena odinakowyh mestah, to taku`situaci` nazywa`t ""bykom"" (oboz-na~aetsq ""b"")." d" Esli ob}ie cifry estx, no onistoqt na raznyh mestah, to |to -""korowa"" (obozna~aetsq ""k"")."  "9500" $n3,n0;:n=n3̰"21":"31";" ":n ^n3,n3;"W otwet na hod otgadywa`}egokompx`ter soob}aet ob}ee ~islo""bykow"" i ""korow""." " Esli,naprimer, zadumano ~islo5239,a nazwano 2735,to otwet bu-det ""1b-2k"". Cifra 3 imeetsq woboih ~islah i stoit na odinako-" i"wyh mestah (1b), cifry 2 i 5 ob-}ie, no stoqt na raznyh mestah(2k),cifry 7 i 9 ne qwlq`tsq ob-}imi." Z" Polu~iw otwet, otgad~ik izme-nqet wwodimoe im ~islo s u~etompolu~ennoj informacii."  " Igra zakan~iwaetsq, kogda nao~erednoj hod otgadywa`}ij polu-~aet otwet ""4b-0k"", t.e. kogdazadumannoe ~islo otgadano." "9500":"100" |fn2::n9;"PROSMOTR HODOW";n2,n9;"% ^ISLO REZ-T":"70","150":"115",n0:"70","148":"115",n0 Wn=n1j:p="3+n-18*(n/18-.01)":p,n9;n;"13";y$(n4*n-n3n4*n);" ";z$(n5*n-n4n5*n)  p<"21"n 8p="21"w2:#n0;n1,n0;s$;s$:m=n4̰"21":m,n9;s$:m n  w2:"100" @8rus:"100":o$="&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&":o$ J$n=n1n7:n,n0;"&";n,"31";"&":n Tn=n8̰"21":n,n0;o$:n ^_n9,"16";" BYKI i KOROWY ";"10","16";" kombinatornaq ";"11","16";"logi~eskaq igra" h-n="15"̰"20":n,"19";" ":n rym="21":"16",m;n1;n1;"Komentarij";"17",m;"na russkom";"18",m;" qzyke ":lat:"19",m;" WIN-1987":rus | %[#n0;n1,n0;" Dlq prodolveniq navatx ":lat:#n0;n1,"24";"""ENTER"" ":rus:n0: %9#n0;n1,n0;" Navmite na l`bu` klawi{u ":n0: &rx="(256-xs*cs*d$)/2":a="23306":a,x:a+n1,y:a+n2,xs:a+n3,ys:a+n4,cs:a=a+n4:w=d$:i=n1w:a+i,d$(i):i &a+w+n1,"255":w="32256": &"23760":n7:n0:n7: &9n1:d$="Stop the tape":xs=n2:ys=n4:y="110"::dd:n0 '2d$="Bulls-Cows":xs=n3:ys=n9:y=n0:dd:"8000" 'Gd$="Dlq starta navatx l`bu` klawi{u":xs=n1:ys=n2:y="176":dd:lat 'n0:100d '.236066\,14:236077\,93]: '-236066\,0:236077\,60<: 'W:"9989":"Bulls-Cows"ʰ"9991":::"":n="6"̰"16":n,"9";"VERIFY=O.K.":n: 'kl=ç:"60" ^