Регистрация
Аида1611
06.07.2021 03:54
Информатика
Есть ответ 👍

Найти произведение четных чисел оканчивающихся на 4 в паскаль

134
348
Посмотреть ответы 1

Ответы на вопрос:

алгебра107
алгебра107
4,7(69 оценок)
Var s,k,i: integer; begin k: =0; s: =0; for i: =35 to 150 do begin if (i mod 8 = 1) or (i mod 8 = 2) then begin s+=i; k+=1; end; end; writeln('количество - ',k); writeln('сумма - ',s); end.

Популярно: Информатика