Составить алгоритм и программу на Паскале, позволяющую найти сумму натуральных чисел, кратных 12, в диапазоне от 1 до 70
Составить алгоритм и программу на Паскале, позволяющую найти сумму натуральных чисел, кратных 12, в диапазоне от 1 до 70
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
var
i, sum: Integer;
begin
sum := 0;
for i := 1 to 70 do
begin
if (i mod 12 = 0) then
sum := sum + i;
end;
writeln('Сумма натуральных чисел, кратных 12, в диапазоне от 1 до 70: ', sum);
end.