Реферат: Синтаксический распознаватель арифметического оператора условного перехода языка FORTRAN

"Ожидается '+' или '-'.",

"Ожидается '*','/' или '**'.",

"Ожидается ).",

"Ожидается идентификатор или целое без знака.",

"Отсутствует ','.",

"Не конец строки.",

"Ожидается (.",

"Метка - не целое без знака.",

"Отсутствуют метки.",

"Не найден оператор IF.",

"Отсутствует метка.",

"Отсутствует AB.",

NULL

};

sprintf(mes[e1][e2],"%s",E[num-1]);

e2++;

#ifdef TEST

Beep(1000,100);

cprintf("Ошибка: %s\r\n",E[num-1]);

getch();

#endif

fprintf(fl," ¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾\n");

fprintf(fl,"Ошибка: %s\r\n",E[num-1]);

}

//¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾

// Float.

//¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾

int Float(void)

{