Нужно составить команду в кумире чертежник, чтобы получилось имя богдан. .

Первый способ (большой): использовать чертежник алг богдан_1 нач опустить перо сместиться в точку(0, 11) сместиться в точку(6, 11) поднять перо сместиться в точку(0, 6) опустить перо сместиться в точку(6, 6) сместиться в точку(6, 0) сместиться в точку(0, 0) поднять перо сместиться в точку(8, 0) опустить перо сместиться в точку(8, 11) сместиться в точку(14, 11) сместиться в точку(14, 0) сместиться в точку(8, 0) поднять перо сместиться в точку(16, 0) опустить перо сместиться в точку(16, 11) сместиться в точку(22, 11) поднять перо сместиться в точку(22, 0) опустить перо сместиться в точку(22, -2) сместиться в точку(22, 0) сместиться в точку(30, 0) сместиться в точку(30, -2) сместиться в точку(30, 0) сместиться в точку(28, 0) сместиться в точку(28, 11) сместиться в точку(24, 11) сместиться в точку(24, 0) поднять перо сместиться в точку(32, 0) опустить перо сместиться в точку(32, 11) сместиться в точку(38, 11) сместиться в точку(38, 0) сместиться в точку(38, 5) сместиться в точку(32, 5) поднять перо сместиться в точку(40,0) опустить перо сместиться в точку(40, 11) сместиться в точку(40, 5) сместиться в точку(46, 5) сместиться в точку(46, 11) сместиться в точку(46, 0) кон второй способ (короткий): использовать чертежник алг богдан_2 нач написать(30, "богдан") кон

program risovalka;

  uses  crt,graphabc;

    var  xc,yc,r1,r2,rc,ro,n,i,x,y: integer;

  a: real;

    begin  repeatwrite('ykashi shislo otverstii ot 5 do 10 n=');

      read(n);

    until  n  in  [5..10];

    clrscr; hidecursor;

    xc: =windowwidth  div  2;

    yc: =windowheight  div  2;

    r1: =40;

    r2: =120;

    rc: =100; ro: =30;

    a: =2*pi/n;

    circle(xc,yc,r2);

    circle(xc,yc,r1);

      for  i: =1  to  n  do    begin    x: =xc+round(rc*cos(a*i));

      y: =yc-round(rc*sin(a*i));

      circle(x,y,ro);

        end.