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

Напишите пожалуйста команды от начала и до конца. Постройте караблик в PascalABC

Приложения:

Ответы

Автор ответа: 13nisa13
0

uses graphabc;

begin

SetPenWidth(2);

moveto(200,400);

lineto(100,200);

lineto(600,200);

lineto(500,400);

lineto(200,400);

circle(250,300,50);

circle(250,300,25);

rectangle(200,50,300,200);

rectangle(400,50,500,200);

line(300,50,400,200);

line(500,50,600,200);

end.

Приложения:
Похожие вопросы
Предмет: Математика, автор: Sealf
Предмет: Алгебра, автор: sevasgtv
Предмет: Математика, автор: natalyakuznets1
Предмет: Алгебра, автор: Кариночка78