Найдите произведение четных чисел, не привыкающих - вопрос №3039949 от tanecka2 27.06.2020 20:45

Question

Информатика: Найдите произведение четных чисел, не привыкающих заданное натуральное число(n)

tanecka2 · Answer

Var n,i,p:integer;beginp:=1;readln(n);for i:=1 to n doif i mod 2 = 0 then k:=k*i;writeln(k);end....