HOME ПРИМЕРЫ THANKS НОВИЧКАМ ДОКИ LINKS JavaScript Mail


 
В этот день много лет назад...
20 января. В 1997 году (22 года назад) - 5 членов Клуба любителей мини-бобслея из Базеля, Швейцария начинают строить (по 2 февраля 1997) миниатюрную копию знаменитой бобслейной трассы Санкт-Мориц - Целерина. Ее ледяной желоб имел длину 55 м при ширине 7 см и перепаде высот 4,5 м. Для гонок на этой трассе использовались мини-бобслеи длиной 17,5 см и шириной 5,5 см.
 
 

Turbo Pascal Documentation

Процедура Circle


     Функция: Рисует окружность. Точка (Х,Y) считается  цен-
тром окружности.
     Описание: Circlе(Х,Y : integer; радиус : word)
     Примечания: Окружность рисуется текущим цветом. В  каж-
дом  графическом драйвере содержится коэффициент относитель-
ного удлиннения, который используется в  процедурах  Сirclе,
Аrс и РiеSliсе.
     Ограничения: Должен использоваться графический режим.
     Прочее: См. также процедуры Arc, Ellipse, GetArcCoords,
GetAspectRatio, PieSlice.
     Пример:

for r := 1 to 5 do
   Circle(100,100,r*10);




HOME