Движение предметов Опции

[Spaun]

Составить программу в графическом режиме, в которой по наклонной катится окружность.

program speed;
uses crt, graph;
var
    gd,gm:integer;
begin
    gd:=VGA;
    gm:=VGAhi;
initgraph (gd,gm,'C:\BP\BGI');
if graphresult =grOk then
begin
line (0,0,639,479);
circle (15,20,15);
...
end;
end.

Вот на что меня хватило, может кто подскажет как сделать иллюзию движения

[volvo]

Не знаю почему но не работает, мерцает курсор и все.

Не знаю, почему (и главное - ЗАЧЕМ), но я все программы проверяю прежде чем выложить... Странно, да? Правила Раздела - обычно для того, чтобы их соблюдать, а не для того, чтоб они там были в красивой рамочке:

7. Проверяйте программы перед тем, как разместить их на форуме!!!

Так вот у меня все отработало. Если у тебя не работает - значит, что-то делал не так. Приводи программу полностью, и название компилятора тоже (а то BP\BGI наводит на некоторые подозрения)