Anonymous user
A+B: Difference between revisions
→Solutions: Added a section an Ada solution
m (→{{header|Icon and Unicon}}: Don't use header like this) |
(→Solutions: Added a section an Ada solution) |
||
Line 26:
= Solutions =
=={{header|Ada}}==
<lang Ada>-- Standard I/O Streams
with Ada.Integer_Text_Io;
procedure APlusB is
A, B : Integer;
begin
Ada.Integer_Text_Io.Get (Item => A);
Ada.Integer_Text_Io.Get (Item => B);
Ada.Integer_Text_Io.Put (A+B);
end APlusB;
</lang>
=={{header|Argile}}==
{{trans|C}}
| |||