Anonymous user
Input/Output for pairs of numbers: Difference between revisions
→{{header|OCaml}}: added ocaml
(→{{header|OCaml}}: added ocaml) |
|||
Line 451:
end
for _, result in pairs(intTab) do print(result) end</lang>
=={{header|OCaml}}==
<lang ocaml>let () =
let n = int_of_string (input_line stdin) in
for i = 1 to n do
let line = input_line stdin in
match String.split_on_char ' ' line with
| a::b::[] ->
let x = int_of_string a + int_of_string b in
print_int x;
print_newline ()
| _ ->
raise (Invalid_argument "wrong input")
done</lang>
{{out}}
<pre>
$ cat input.txt
5
1 2
10 20
-3 5
100 2
5 5
$ cat input.txt | ocaml pairs.ml
3
30
2
102
10
</pre>
=={{header|PARI/GP}}==
| |||