Запишите формат оператора позволяющего вывести на экран закрашеный прямоугольник с указанием значения каждого параметра

Procedure Rectangle (x1, y1, x2, y2: integer);

Рисует прямоугольник, заданный координатами противоположных вершин (x1, y1) и (x2, y2)

(x1, y1) - координаты левого верхнего угла

(x2, y2) - координаты правого нижнего угла.

Например:

Rectangle (100,100,540,380);

FloodFill (320, 240, clGold); - закрашивает замкнутую область золотым цветом