program summa;
var c, a, b: real;
begin
write ('Вычисление суммы двух чисел');
write ('Введите А ');
read (a);
write ('Введите Б ');
read (b);
c:=a+b;
write (a, ' + ',b, ' = ', c);
end.
Объяснение:
Название программы
Описание переменных
Тело программы