Основы применения вычислительной техники и программирование. Беспалов В.В. - 82 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

Составители: 

Рубрика: 

– вычерчивает трехмерный закрашенный прямоугольник (параллелепи-
пед). При этом использую , установленныется тип и цвет закраски с по-
число пиксе-
а
e(200,1 00);
,True);
огоугольников
мыми различными способами,
например в Турбо Паскале имеется
проце оить любые многоуголь-
ники
нике.
oints. Необходимо пом-
нить,
ра вычерчивания окружности текущим цветом имеет сле-
дующий
Cicr
Здесь
программы обеспечит вывод ярко-зеленой
икселей и центром в точке (450, 100):
Circle(450,100,50);
мощью
SetFillStyle. Параметр d представляет собой
лей, задающих глубину трехмерного контура. Чаще всего его значение
равно четверти ширины прямоугольника (
d:=(x2-x1) div 4). Па-
раметр
a определяет, строить над прямоугольником вершину
(
а:=True) или нет (a:=False).
Примеры использов ния:
SetColor(Green);
ectangl 00,250,3R
SetFillStyle(1,3);
Bar(10,10,50,100);
SetFillStyle(1,3);
Bar3D(10,10,50,100,10
10.4.6. Построение мн
Многоугольники можно рисовать са
, с помощью процедуры Line. Однако
дура
DrawPoly, которая позволяет стр
линией текущего цвета, стиля и толщины. Она имеет формат
DrawPoly(a:word;var PolyPoints);
Параметр
PolyPoints является нетипизированным параметром,
который содержит координаты каждого пересечения в многоуголь
Параметр
а задает число координат в PolyP
что для вычерчивания замкнутой фигуры с N вершинами нужно
передать при обращении к процедуре
DrawPoly N+1 координату, где
координата вершины с номером N будет равна координате вершины
с номером 1.
10.4.7. Построение дуг и окружностей
Процеду
формат:
le(x,y,r:word);
x,y – координаты центра окружности, r – ее радиус.
Например, фрагмент
окружности с радиусом 50 п
SetColor(LightGreen);
83

Страницы