Заставьте окружность бесконечно двигаться, отскакивая от правого и левого краев экрана. Пожалуйста помогите! Нужно в Turbo Pascal. Своих мозгов нехватает..

Question

Заставьте окружность бесконечно двигаться, отскакивая от правого и левого краев экрана. Пожалуйста помогите! Нужно в Turbo Pascal. Своих мозгов нехватает..

Гость

Ответ(ы) на вопрос:

Accepted Answer

Исходник во вложении. P.S.Правда не совсем удачная реализация...