RosettaCodeData/Task/A+B/Ada/a+b-1.ada
2013-04-10 14:58:50 -07:00

10 lines
222 B
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;