Дано 20 целых чисел: 13,14,15,...32. Напишите программу для вычисления и вывода на экран суммы только тех чисел, которые делятся без остатка на 8( кратны восьми).
Дано 20 целых чисел: 13,14,15,...32. Напишите программу для вычисления и вывода на экран суммы только тех чисел, которые делятся без остатка на 8( кратны восьми).
Гость
Ответ(ы) на вопрос:
Гость//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
begin
var s:=0;
for var i:=13 to 32 do if i mod 8 =0 then s:=s+i;
println('Сумма кратных 8:',s);
end.
Не нашли ответ?
Похожие вопросы