Ответ(ы) на вопрос:
ГостьЕсли имелось ввиду, нарисовать,то
uses graphABC;
begin
ClearWindow (clTeal);
Rectangle (200,200,360,360);
Line (200,200,280,280);
Line (280,280,360,200);
end.
Не нашли ответ?
Похожие вопросы