Помогите написать программу. Нужно нарисовать рыбу и сделать так, чтобы она плыла слева направо. Рыбу я нарисовал:
uses GraphABC;
begin
arc(110,360,100,45,160);
arc(110,220,100,200,315);
line(15,256,15,325);
circle(148,288,3);
line(180,290,165,290);
readln;
end.
Теперь нужно заставить её двигаться. А как?