Bulls and cows/Player: Difference between revisions
Content added Content deleted
imported>Algol68G |
imported>Algol68G |
||
Line 297: | Line 297: | ||
DO read ((z, new line)) |
DO read ((z, new line)) |
||
OD; |
OD; |
||
printf (($gl$, z)); |
|||
FOR i TO UPB z |
FOR i TO UPB z |
||
DO (z[i] = "c" | col ok |: z[i] = "b" | pos ok) +:= 1 |
DO (z[i] = "c" | col ok |: z[i] = "b" | pos ok) +:= 1 |