Сpascal abc,ни как не могу разобраться. ну вообщем нужно сделать любой рисунок (не цветной) на 30 программ.

Sl1dan Sl1dan    2   01.08.2019 16:50    0

Ответы
gordeevnikita11 gordeevnikita11  29.09.2020 10:21
Uses drawman;
begin
field(14,14);
ToPoint(2,2);
PenDown;
ToPoint(2,8);
ToPoint(8,8);
ToPoint(8,2);
ToPoint(2,2);
PenUp;
toPoint(5,11);
pendown;
ToPoint(2,8);
ToPoint(8,8);
ToPoint(5,11);
penup;
topoint(4,6);
pendown;
ToPoint(6,6);
ToPoint(6,4);
ToPoint(4,4);
ToPoint(4,6);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика