var a,k:int64; begin k:=1; writeln('Vvedite chislo'); read(a); while a>0 do begin a:=a mod 10; k:=k 1; end; write('V chisle',k,' tsifr'); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.