Anonymous user
Bulls and cows/Player: Difference between revisions
→{{header|ALGOL 68}}
imported>Algol68G |
imported>Algol68G |
||
Line 297:
DO read ((z, new line))
OD;
FOR i TO UPB z
DO (z[i] = "c" | col ok |: z[i] = "b" | pos ok) +:= 1
|