Логічні елементи, що застосовуються в електронно-обчислювальній техніці
i=0;
n=i+2;// n-кількість адресних входів
sub_intro();
setcolor(4);
outtextxy(280,200,">");
while(!kbhit())
{
key=getch();if(key==13) goto next;//вихід із функції
key=getch();
//управління клавішами курсора
switch(key)
{
case 72:cleardevice();
i--;
if(i<0) i=2;
n=i+2;
sub_intro();
setcolor(4);
outtextxy(280,200+i*40,">");
break;
case 80:cleardevice();
i++;
if(i>2)i=0;
n=i+2;
sub_intro();