var a,k: integer; begin a:=1; k:=0; while (a<>0) do begin if ((a<100) and (a>9) and (a mod 8 =0)) then k:=k 1; end; writeln(k); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
