Question

Написать программу которая запрашивает у пользователя ввести 2 числа и выводит на экран их сумму.

Answer 1

Var x,y:integer;
Begin
Readln (x,y);
X:=x+y;
Writeln ('сумма равна ',x);
End.

Answer 2

Program DvachAnon;
var varFirst,varSecond:real;
begin
  write('Введите первое слагаемое: ');
  read(varFirst);
  write('Введите второе слагаемое: ');
  read(varSecond);
  writeln('Сумма: ',varFirst + varSecond); 
  readln();
end.