Smallest square that begins with n: Difference between revisions

Content added Content deleted
(Add OCaml)
Line 1,075: Line 1,075:


let _ =
let _ =
for i = 1 to 49 do
for n = 1 to 49 do
Printf.printf "%d%c" (smallest i) (if i mod 10 = 0 then '\n' else '\t')
Printf.printf "%d%c" (smallest n) (if n mod 10 = 0 then '\n' else '\t')
done</lang>
done</lang>