var n,i,k:Integer; Begin Read(n); for i:=1 to n do if (n mod i = 0) and (i mod 2 <>0) then k:=k 1; Writeln(k); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.