Составьте программу находящую произведение четных - вопрос №5248586110 от elizavetaelise1 26.08.2020 21:27

Question

Информатика: Составьте программу находящую произведение четных чисел от 1 до 10. чему оно равно?

elizavetaelise1 · Answer

Var i,p:integer;beginp:=1;for i:=1 to 10 do if i mod 2 = 0 then p:=p*i;writeln( p= ,p);end.Результат:p=3840...