with Ada.Text_IO;         use Ada.Text_IO;
with Ada.Integer_Text_IO; use Ada.Integer_Text_IO;
 
procedure Add_Numbers is
   A, B, Sum : Integer;
begin
   -- Input A
   Put("Enter A: ");
   Get(A);
   Put(A);
   New_Line;
 
   -- Input B
   Put("Enter B: ");
   Get(B);
   Put(B);
   New_Line;
 
   -- Compute sum
   Sum := A + B;
 
   -- Print result
   Put(A);
   Put(" + ");
   Put(B);
   Put(" = ");
   Put(Sum);
   New_Line;
end Add_Numbers;
 

d2l0aCBBZGEuVGV4dF9JTzsgICAgICAgICB1c2UgQWRhLlRleHRfSU87CndpdGggQWRhLkludGVnZXJfVGV4dF9JTzsgdXNlIEFkYS5JbnRlZ2VyX1RleHRfSU87Cgpwcm9jZWR1cmUgQWRkX051bWJlcnMgaXMKICAgQSwgQiwgU3VtIDogSW50ZWdlcjsKYmVnaW4KICAgLS0gSW5wdXQgQQogICBQdXQoIkVudGVyIEE6ICIpOwogICBHZXQoQSk7CiAgIFB1dChBKTsKICAgTmV3X0xpbmU7CgogICAtLSBJbnB1dCBCCiAgIFB1dCgiRW50ZXIgQjogIik7CiAgIEdldChCKTsKICAgUHV0KEIpOwogICBOZXdfTGluZTsKCiAgIC0tIENvbXB1dGUgc3VtCiAgIFN1bSA6PSBBICsgQjsKCiAgIC0tIFByaW50IHJlc3VsdAogICBQdXQoQSk7CiAgIFB1dCgiICsgIik7CiAgIFB1dChCKTsKICAgUHV0KCIgPSAiKTsKICAgUHV0KFN1bSk7CiAgIE5ld19MaW5lOwplbmQgQWRkX051bWJlcnM7Cg==

Mgoy

2
2