Задача Pascal нужна подсказка.

[BanzoO]

8) Дорожный знак «Корпич» постепенно (за 20 сек с дискретом 0.4сек на каждом шаге) прячет-ся за горизонт;
Задачу делать не надо подскажите переменные в Uses(graph?)
И как нарисовать это знак?
Думаю рисуется ето всё по принцепу Стёр-нарисовал,а секунды с помощью delay.

Мож здесь найдутся умные люди кто в геометрии шарит Я как и мои друзья дигродировали Как сделать задание знаю, а как пощитать входит,не входит незнаю
5)Вводятся координаты центра и радиус окружности. Определить, находится ли центр ко-ординат внутри окружности.

[ОДИНОЧЕСТВО В СЕТИ]

Вводятся координаты центра и радиус окружности. Определить, находится ли центр ко-ординат внутри окружности.

если расстояние от центра координат до центра окружности <R тогда входит если >=R тогда не входит

[BanzoO]

Thx u very match. Теперь осталось 1вую решить

[Stilet]

Думаю рисуется ето всё по принцепу Стёр-нарисовал,а секунды с помощью delay.

Ну дык правильно думаешь.
Но лучше не стирать экран а рисовать цветом фона.

[BanzoO]

понятно, но я не знаю как нарисовать красный круг и внутри него белый керпич

[ОДИНОЧЕСТВО В СЕТИ]

FillEllipse(X, Y:Integer; XRadius,YRadius:Word);

Рисует на экране залитый эллипс с центром в точке (X, Y), радиусами XRadius, YRadius. Стиль и цвет заливки задаются процедурой SetFillStyle.

при xradius=yradius будет круг!!!

Bar(X1, Y1, X2, Y2:Integer);

Рисует на экране залитый прямоугольник с верхним левым углом в точке (X1, Y1) и нижним правым углом в точке (X2, Y2). Стиль и цвет заливки задаются процедурой SetFillStyle.

SetFillStyle(Pattern:Word; Color:Word);

Устанавливает стиль и цвет заливки. Если Pattern равно UserFill, то используется определенный пользователем стиль, описанный процедурой SetFillPattern.

SetFillPattern(Pattern:FillPatternType; Color:Word);

Устанавливает определяемый пользователем стиль и цвет заливки. FillPatternType=Array [1..8] of Byte;

[BanzoO]

Когда использую граф вылезает такая ошибка, можно ли её исправить?
http://www.images.kanet.ru/files/675/eror.jpg

[ОДИНОЧЕСТВО В СЕТИ]

операционная система?

[netrino]

Сообщение от BanzoO

Когда использую граф вылезает такая ошибка, можно ли её исправить?
http://www.images.kanet.ru/files/675/eror.jpg

Начиная с Windows Vista полноэкранный режим дос-приложений запрещён. Чтобы это исправить можно использовать DosBOX, или поставить дрова на видео с XP

[BanzoO]

Ясно. Дрова не катит Буду преподу жаловатся