Предыдущая страница реферата | 26  27  28  29  30  31  32  33  34  35  36

case 36:z[z1]=2;z1++;z[z1]=9;z1++;z[z1]=4;z1++;z[z1]=7;z1++;z[z1]=1;v++;

    printf("tЗаменить(B'П'С'M1,B)tСдвигn");vl[j]=36;break;

case 37:z[z1]=0;v++;

    printf("tЗаменить(S)tСдвигn");vl[j]=37;break;

case 38:z1--;

    printf("tВытолкнутьtДержатьn");vl[j]=38;break;

case 39: printf("ДОПУСТИТЬn");i=1;vl[j]=39;break;

case 0: printf("Отвергнутьn");i=2;vl[j]=0;break;

 }

if(i==1|i==2)break;else j++;

}

while(tab[z[z1]][a[v]]!=0||tab[z[z1]][a[v]]!=39);

printf("Выходная лента:n");

for(k=0;k<=j;k++)

{

printf("%d ",vl[k]);

}

return i;

};

/*--------------------------УДАЛЕНИЕ ПРОБЕЛОВ---------------------------------------*/

/*int probel()

{

int i(0),k(0);

for(i=0;i<=j-1;i++)

{

if(s[i]!=' '){s1[k]=s[i];k++;}

}

j=k;

};*/

/*-------------------------------------------------------------------------*/

int main()

{

int w,i;

clrscr();

//probel();

y=vvod();

w=0;

a[w]=0;

if(y==1)

{lexica();

i=analiz();}

if(y==2)

{

lexica1();

i=analiz1();

}

getch();

return 0;

}

Скачали данный реферат: Milov, Кондр, Bessmertnyj, Мамыкин, Antip, Паршин, Prokl.
Последние просмотренные рефераты на тему: инновационный менеджмент, шпори скачать бесплатно, персонал реферат, доклад на тему.



Предыдущая страница реферата | 26  27  28  29  30  31  32  33  34  35  36

Поделитесь этой записью или добавьте в закладки