�ݺ�ߣ

Анимация в PascalABC
1

• Анимация – это
последовательность сменяющих
друг друга кадров.
2

• Цикл. Предполагает возможность
многократного повторения
определенных действий.
Количество повторений зависит от
условия цикла.
3
+
Условие
Тело цикла
-

Цикл for
• Этот цикл используется, когда
число повторений не связано с тем,
что происходит в теле цикла. Т.е.
количество повторений может быть
вычислено заранее
4
For i to n do
значение присваивается так
называемой переменной-
счетчику, от этого значения
начинается отсчет количества
повторений.
Например: i:=1
значении
счетчика, при
котором цикл
должен
остановиться.
Например: 700

Program VK;
uses GraphABC;
begin
SetPenColor(clblack);
Circle(50,50,30);
FloodFill(50,50,clgreen);
end.
5

Program VK;
uses GraphABC;
begin
SetBrushColor(clGreen);
Circle(50,50,30);
end.
6
благодаря этой
команде, мы
заливаем нашу
фигуру полностью
в нужный нам цвет.

Program VK;
uses GraphABC;
var i: integer;
begin
for i:=1 to 500 do //для i от 1 до 500 делать
begin
ClearWindow; //очистка экрана
SetBrushColor(clGreen); //заливка фигуры
Circle(50+i,50,30); //рисование окружности
Sleep(1); //скорость движения окружности
end;
end.
7

Program VK;
uses GraphABC;
var I: integer;
begin
lockDrawing;
for i:=1 to 500 do
begin
ClearWindow;
SetBrushColor(clGreen);
Circle(50+I,50,30);
Redraw;
Sleep(1);
end;
end. 8

�ݺ�ߣ

Анимация в PascalABC

Recommended

More Related Content

What's hot (19)

Similar to Анимация в PascalABC (12)

Анимация в PascalABC