Anonymous user
Integer comparison: Difference between revisions
added ocaml
No edit summary |
(added ocaml) |
||
Line 289:
else if a > b then print "a is greater then b"
else if a == b then print "a is equal to b"
=={{header|OCaml}}==
let my_compare a b =
if a < b then "A is less than B"
else if a > b then "A is greater than B"
else if a = b then "A equals B"
else assert false (* can't happen *)
let () =
let a = read_int ()
and b = read_int () in
print_endline (my_compare a b)
=={{header|Pascal}}==
| |||