RosettaCodeData/Task/A+B/Ada/a+b-1.adb
2026-04-30 12:34:36 -04: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;