Подсчитать сумму четных, не делящихся без остатка на 8 чисел от 5 до 75.по паскалю. надо,заранее : *

valeriargavina valeriargavina    3   05.06.2019 21:10    0

Ответы
maximorlov04 maximorlov04  06.07.2020 08:45
Var s,i:integer;
begin
for i:=5 to 75 do
if i mod 8 <> 0 then s+=i;
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика