Var i:integer; begin for i:=100 to 150 do begin clearwindow; rectangle(i,i,i-30,i-30); sleep(100); end; end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
