Напишите фрагмент програмы (паскаль) для решения - вопрос №2735583 от KitKat321456 21.03.2023 14:22

Question

Информатика: Напишите фрагмент програмы (паскаль) для решения : вычислить сумму чисел от 3 до 9, кратных 4. у меня получается сделать только какие числа принадлежат промежутку, а сумму не могу

KitKat321456 · Answer

Фигня!

var

begin

for i := 3 to 9 do

begin

if (i mod 4 = 0) then

begin

s := s + i;

end;

writeln('сумма равна ',s);

end.

Если что-то непонятно пиши в вк /pifi_fc