Вообще-то надо самому учиться. Uses crt; Var k: integer; Begin Writeln(vvedite chislo -); Readln(k); k:=k div 10; writeln(1 cifra= ,k); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.