Жучки, едят друг друга Опции

[Гersh]

Задача 229. Смоделируйте движение n случайно расположенных на плоскости жучков (точек – Авт.), каждый из которых с постоянной скоростью, ползет к жучку со следующим номером (n-й ползет к первому). При расстоянии между жучками меньшем некоторого критического преследуемый жучок считается съеденным и исчезает с экрана.

Я ее сделал, но оказалось, что жучки не должны ползти c постоянной скоростью, а должны догонять друг друга с постоянной скоросью. То есть каждый ход расстояние между двумя любыми жучками должно сокращаться.
Это, очевидно, делается через задание направления и приращения скорости, но я не понял КАК это делать.
Помогите кто-нибудь.
Прилагается моя версия программы и мой модуль.

ЗЫ. Кто хочет поприкалываться можно запускать программу в данной версии исключив процедуру Go и/или убрать очисту экрана. Получается сприкольно! ;) (Особенно если подключить драйвер BGI256)

[Гersh]

Чего??
Ну ты дал! ;))
Нет, это все ясно. У меня проплема с рассчетом координат... Чтобы расстояние между двумя любыми жучками сокращалось кажду секунду... Я просто не понимаю как это сделать...

[Lapp]

Чтобы расстояние между двумя любыми жучками сокращалось кажду секунду... Я просто не понимаю как это сделать...

Это условие (между любыми) противоречит первоначальному.
Если каждый n-ный догоняет (n+1)-го, то вектор скорости направь по вектору разницы векторов на каждого из них. То есть в любой момент каждый жук ползет точно по направлению к следующему (не обращая внимания на остальных, в том числе и на того, который догоняет его). По сути, оно так и было в твоем решении, только скорость была кривая - вот и все. И результат тоже будет похожий - они все друг друга съедят. А в процессе каждый опишет траекторию, которая назвается в математике "кривая погони".