Анимация в Pascal ABC

Хаотичное появление
объектов на экране

Пример 1. Рисуем случайные окружности
Пока не будет нажата любая клавиша (команда keypressed) циклически повторяются команды цикла:
Задается цвет кисти через функции RGB() и RANDOM()
Рисуется окружность с центром в случайной точке экрана, со случайно выбранным радиусом. (используется функция RANDOM())
Команда Sleep(n) выполняет задержку, в ms (мили секундах) между перерисовками.

Пример 1

Пример 2

Задание для
самостоятельной работы
1. Создайте программу «цветной дождь»
(заполнение экрана наклонными отрезками)
2. Измените направление наклона отрезков