Сборник заданий для практических занятий по информатике. Крупенников О.Г - 105 стр.

UptoLike

104
16. Процедура FLOODFILLзаполняет произвольную замкнутую
фигуру, используя текущий стиль заполнения (узор и цвет).
Заголовок процедуры:
PROCEDURE FLOODFILL (X, Y: INTEGER; BORDER: WORD); ,
где X, Y – координаты любой точки внутри замкнутой фигуры; BORDER –
цвет граничной линии (см. параграф 11.1).
17. Процедура FILLELLIPSEобводит линией и заполняет эллипс.
Заголовок процедуры:
PROCEDURE FILLELLYPS (X, Y, RX, RY: INTEGER); ,
где X, Y – координаты центра; RX, RY – горизонтальный и вертикальный
радиусы эллипса.
18. Процедура BARзаполняет прямоугольную область экрана.
Заголовок процедуры:
PROCEDURE BAR (X1, Y1, X2, Y2: INTEGER); ,
где X1, Y1; X2, Y2 – соответственно координаты левого верхнего и право-
го нижнего углов закрашиваемой области.
19. Процедура OUTTEXTвыводит текстовую строку, начиная с
текущего положения указателя.
Заголовок процедуры:
PROCEDURE OUTTEXT (TXT: STRING); ,
где TXT – выводимая строка.
20. Процедура OUTTEXTXYвыводит строку, начиная с заданного
места.
Заголовок процедуры:
Procedure OUTTEXTXY (X, Y: INTEGER; TXT: STRING); ,
где X,Y – координаты точки начала вывода строки; TXT – выводимая
строка.