програму, що запускається і видає на екран меню з двох пунктів

Pidgotovka();

// меню

setfillstyle(1,7);

setcolor(11);

settextstyle(0,0,1);

outtextxy(269, 123, "Формування");

outtextxy(295,227,"Запит");

outtextxy(298, 340, "Bихiд");

// перемiщення в меню

do

{

putimage(X,y,saucer,XOR_PUT);

c=getch();

putimage(X,y,saucer,XOR_PUT);

switch(c)

{

case 80:y+=STEP;q++;if(y==400){y=100 ;q=1;}break;

case 72: y-=STEP;q--;if(y==0){y=300;q=3;}break;

case 13: if(q==3)goto po;

if(q==1)

{ dbcreate();

goto poch; }

if(q==2)

{ dbshow();

goto poch; }