Помогите составьте в паскале квадрат и у него стороны цветные спасибо

program znaniyya; uses drawman; Field (10,10) begin ToPoint  (1,1); PenDown; ToPoint (1,8); ToPoint (8,8); ToPoint (1,8); ToPoint (1,1); PenUp; ToPoint (0,0); end.