найти и вывести на экран сумму чисел от 20 до n Pascal циклы ​
Ответ
5 (2 оценки)
1
valgrisa 1 год назад
Светило науки - 1368 ответов - 0 раз оказано помощи

Ответ:

program z;

var i, n, s: integer;

begin

read(n);

for i:=20 to n do s:=s+i;

write(s)

end.

Объяснение:

n >= 20 иначе программа выведет 0

Остались вопросы?