Реферат: Построение формального языка L
gotoxy(5,3);cprintf("Проверте его наличие на диске");
gotoxy(5,4);cprintf(" или создайте новый");
gotoxy(3,6);cprintf("Для продолжения нажмите любую клавишу");
getch();
exit(0);
}
for(i=0;i<25;i++)
{
window(40-i,12-i/5,40+i,12+i/5);
textbackground(GREEN);
textcolor(BLACK);
clrscr();
delay(7);
}
textcolor(WHITE);
gotoxy(12,2);cprintf("Чтение строк для разбора");
gotoxy(12,3);cprintf(" произведеное из");
gotoxy(12,4);cprintf(" файла ");
gotoxy(12,5);cprintf(" test.513 ");
gotoxy(7,8);cprintf(" Для продолжения нажмите любую клавишу");
getch();
for (i=0; i<20; i++)
{
if (fgets(TEXT[i],78,fl)==NULL) break; // читать строку файла
}
TEXT[i][0]=NULL;
position=0; //обнуление позиции сдвига стpаниц
fclose(fl);
}