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

procedure Rectangle(x1,y1,x2,y2: integer);         Рисует прямоугольник , заданный координатами противоположных вершин (x1,y1) и (x2,y2) (x1,y1) - координаты левого верхнего угла(x2,y2) - координаты правого нижнего угла.Например:Rectangle (100,100,540,380);FloodFill (320, 240, clGold); - закрашивает замкнутую область золотым цветом