Bulls and cows/Player: Difference between revisions
m
→{{header|J}}: slight simplification
m (→{{header|J}}: fix bad edit) |
m (→{{header|J}}: slight simplification) |
||
Line 1,435:
<lang j>require'general/misc/prompt'
poss=:1+~.4{."1 (i.!9)A.i.9
fmt=: ' ' -.~ ":
play=: {{
while.1<#poss=.poss do.
echo 'guessing ',fmt guess=.({~ ?@#)poss
bc=.
poss=.poss #~({.bc)=guess+/@:="1 poss
poss=.poss #~(
end.
if.#poss do.
| |||