Выведите на экран значение суммы натуральных чисел от 1 до 10.

Question

Информатика

Леонидка

7 января, 23:17

Выведите на экран значение суммы натуральных чисел от 1 до 10.

+4

Ответы (1)

Знаете ответ на вопрос?

Алексаша · Answer 1

Как я понял, нужно ввести два числа, и что бы вывело их сумму

program z:

var x, y:real;

begin

write ('число y=') ;

readln (y) ;

write ('число x=') ;

readln (x) ;

x:=x+y;

writeln ('сумма равно', x) ;

end.