Bulls and cows: Difference between revisions

Content added Content deleted

Inline

@@ Line 2,164: / Line 2,164: @@
 =={{header|EasyLang}}==
-<syntaxhighlight lang="text">
+<syntaxhighlight>
 dig[] = [ 1 2 3 4 5 6 7 8 9 ]
 for i = 1 to 4
-  h = i - 1 + random (10 - i)
+   h = i - 1 + randint (10 - i)
-  swap dig[i] dig[h]
+   swap dig[i] dig[h]
 .
 # print dig[]
@@ Line 2,174: / Line 2,174: @@
 attempts = 0
 repeat
-  repeat
+   repeat
-    ok = 0
+      ok = 0
-    s$[] = strchars input
+      s$[] = strchars input
-    if len s$[] = 4
+      if len s$[] = 4
-      ok = 1
+         ok = 1
-      for i = 1 to 4
+         for i = 1 to 4
-        g[i] = number s$[i]
+            g[i] = number s$[i]
-        if g[i] = 0
+            if g[i] = 0
-          ok = 0
+               ok = 0
-        .
+            .
+         .
       .
-    .
+      until ok = 1
+   .
-    until ok = 1
+   print g[]
-  .
+   attempts += 1
-  print g[]
-  attempts += 1
+   bulls = 0
-  bulls = 0
+   cows = 0
-  cows = 0
+   for i = 1 to 4
-  for i = 1 to 4
+      if g[i] = dig[i]
-    if g[i] = dig[i]
+         bulls += 1
-      bulls += 1
+      else
+         for j = 1 to 4
-    else
-      for j = 1 to 4
+            if dig[j] = g[i]
-        if dig[j] = g[i]
+               cows += 1
-          cows += 1
+            .
-        .
+         .
       .
-    .
+   .
+   print "bulls:" & bulls & " cows:" & cows
-  .
-  print "bulls:" & bulls & " cows:" & cows
+   until bulls = 4
-  until bulls = 4
 .
-print "Well done! " & attempts & " attempts needed."
+print "Well done! " & attempts & " attempts needed."</syntaxhighlight>
-</syntaxhighlight>
 =={{header|Eiffel}}==