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

Question

Информатика

Поликсена

12 августа, 17:33

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

+2

Ответы (1)

Знаете ответ?

Емилиана · Answer 1

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

program z:

var x, y:real;

begin

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

readln (y) ;

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

readln (x) ;

x:=x+y;

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

end.