dykfHu - Online Ada Compiler & Debugging Tool

with Ada.Text_IO;         use Ada.Text_IO;
with Ada.Integer_Text_IO; use Ada.Integer_Text_IO;

procedure Add_Numbers_Alt2 is
   A, B, Sum : Integer;
begin
   -- Input A: prompt and number on same line
   Put("Enter A: ");
   Get(A);
   Put(A);        -- prints A right after reading
   New_Line;

   -- Input B: prompt and number on same line
   Put("Enter B: ");
   Get(B);
   Put(B);        -- prints B right after reading
   New_Line;

   -- Compute sum
   Sum := A + B;

   -- Output result
   Put(A);
   Put(" + ");
   Put(B);
   Put(" = ");
   Put(Sum);
   New_Line;
end Add_Numbers_Alt2;