Закончите четверостишие

идёт бычок качается

вздыхает на ходу

вот досточка кончается

сейчас я? упаду

Четверостишие заканчивается словом упаду

Объяснение:

Идёт бычок качается

Вздыхает на ходу

Вдруг досточка качается

Сейчас я упаду ?!

uses crt,graphabc;

var x,y: integer;

    m: char;

begin

x: =windowwidth div 2;

y: =windowheight div 2;

write ('введите число от 1 до 3-выбор фигуры. 1 - треугольник, 2 - квадрат, 3 - круг);

read (m);

clearwindow;

hidecursor;

case m of

'1': begin

      setpencolor(clred);

      line (xc-100,yc+50,xc+100,yc+50);

      line (xc+100,yc+50,xc,yc-100);

      line(xc,yc-100,xc-100,yc+50);

      floodfill(xc,yc,clred);

      readkey;

    end;

'2': begin

      setpencolor(clgreen);

      rectangle(xc-50,yc-50,xc+50,yc+50);

      floodfill(xc,yc,clgreen);

      readkey;

    end;

'3': begin

      setpencolor(clblue);

      circle (xc,yc,100);

      floodfill(xc,yc,clblue);

      readkey;

    end;

end.