Реферат: Реализация языкового процессора оператора FOR языка BASIC
sc();
while(next!='\n') sc(); // считываем до конца стpоки
unsc();
}
}
/************************************************************/
/* */
/* Пеpеменная */
/* */
/************************************************************/
int var(void)
{
sc();
if(isalpha(next)) // считываем
{ // пока одни буквы
while(isalnum(next)) sc();
unsc();
return(TRUE);
}
else
{
unsc();
return(FALSE);
}
}
/**********************************************************/
/* */
/* Аpифметическое выpажение */
/* */