В программе PascalABC: «Составить алгоритм сложения двух целых чисел A и D, вводимых с клавиатуры. Результат сложения записать в виде переменной S.».
program sums;
var
a,d,s : real;
begin
writeln('Введите 2 числа: ');
readln(a,d);
s := a + d;
writeln('Сумма этих чисел равна: ', s);
end.