Выведите на экран значение суммы натуральных чисел от 1 до 10.
Как я понял, нужно ввести два числа, и что бы вывело их сумму
program z:
var x,y:real;
begin
write(число y=);
readln(y);
write(число x=);
readln(x);
x:=x+y;
writeln(сумма равно,x);
end.
Оцени ответ
