Создать программу для исполнителя Чертежник PascalABC слово Б А Р А Б А Н. Используя OnVector​

Ответы

Ответ дал: gfhjkmgfhjkm20
2

Ответ:

uses Drawman;

begin

Field(22,6);

onvector(3,5);

pendown;

onvector(-2,0);

onvector(0,-4);

onvector(2,0);

onvector(0,2);

onvector(-2,0);

penup;

onvector(3,-2);

pendown;

onvector(1,4);

onvector(1,-4);

penup;

onvector(-2,2);

pendown;

onvector(2,0);

penup;

onvector(1,-2);

pendown;

onvector(0,4);

onvector(2,0);

onvector(0,-2);

onvector(-2,0);

penup;

onvector(3,-2);

pendown;

onvector(1,4);

onvector(1,-4);

penup;

onvector(-2,2);

pendown;

onvector(2,0);

penup;

onvector(3,2);

pendown;

onvector(-2,0);

onvector(0,-4);

onvector(2,0);

onvector(0,2);

onvector(-2,0);

penup;

onvector(3,-2);

pendown;

onvector(1,4);

onvector(1,-4);

penup;

onvector(-2,2);

pendown;

onvector(2,0);

penup;

onvector(1,2);

pendown;

onvector(0,-4);

penup;

onvector(2,4);

pendown;

onvector(0,-4);

penup;

onvector(0,2);

pendown;

onvector(-2,0);

penup;

onvector(-19,-3);

end.

Приложения:

polinaezova4: Спасибочки
Вас заинтересует