Информатика 9 класс Найдите сумму всех натуральных чисел,кратных 4 и не превосходящих 300. Надо сделать в программе Паскаль, используя формулу арифметической прогрессии. Только ответ записать так как это будет в программе Паскаль.

Savasansa Savasansa    1   25.02.2020 15:13    1

Ответы
даша2336 даша2336  05.08.2020 16:10

===== PascalABC.NET =====

begin

 var a1 := 4; // первое натуральное, кратное 4

 var an := 300; // последнее из интервала, кратное 4

 var d := 4; // разность прогрессии

 var n := (an - a1) div d + 1; // количество чисел

 var s := (a1 + an) * n div 2; // сумма

 Print(s)

end.


Информатика 9 класс Найдите сумму всех натуральных чисел,кратных 4 и не превосходящих 300. Надо сдел
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика