program Sum;varA, B, sum: integer;beginwriteln('Enter two numbers:');readln(A);readln(B);
sum := A + B;
writeln('The sum of ', A, ' and ', B, ' is ', sum);end.
program Sum;
var
A, B, sum: integer;
begin
writeln('Enter two numbers:');
readln(A);
readln(B);
sum := A + B;
writeln('The sum of ', A, ' and ', B, ' is ', sum);
end.