Заставьте окружность бесконечно двигаться, отскакивая от правого и левого краев экрана....

0 голосов
66 просмотров

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


Информатика (141 баллов) | 66 просмотров
Дан 1 ответ
0 голосов

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

(2.8k баллов)