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