Предмет: Информатика, автор: nataurbanovich

Pascal ABC. Помогите составить программу любой,сложной геометрической фигуры .

Ответы

Автор ответа: pryhodzichdavid
0

uses Drawman;

begin

field(10,10);

    PenUp;

    ToPoint(4,4);

    PenDown;

    ToPoint(6,4);

    ToPoint(6,6);

    ToPoint(4,6);

    ToPoint(4,4);

    ToPoint(5,1);

    ToPoint(6,4);

    ToPoint(9,5);

    ToPoint(6,6);

    ToPoint(5,9);

    ToPoint(4,6);

    ToPoint(1,5);

    ToPoint(4,4);

end.


Похожие вопросы
Предмет: Математика, автор: chedurek199