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

gotoxy (5,23);

cprintf (" % D ", y);

if (com> 0)

Message (y-1);

}

break;

case EASC_Down:

if (y <22)

{

if (com> 0)

window (3,2,47,24);

else

window (3,2,77,24);

gotoxy (1, + + y);

textattr (63);

clreol ();

cputs (file1 [y-1]);

gotoxy (1, y-1);

textattr (31);

clreol ();

cputs (file1 [y-2]);

gotoxy (5,23);

cprintf (" % D ", y);

if (com> 0)

Message (y-1);

}

break;

}

}

}

// Help.

; Вѕ

void Help (void)

{

window (1,1,80,25);

textattr (78);

clrscr ();

Windows (1,1,80,25, "Help");

window (4,3,77,23);

cprintf ("НОВОСИБІРСЬКИЙ ДЕРЖАВНИЙ ТЕХНІЧНИЙ

УНІВЕРСИТЕТ n n r ");

cprintf ("КАФЕДРА АСУ n n r ");

cprintf ("Курсова робота з системного програмування на тему: n r ");

cprintf (" "Арифметичний оператор умовного переходу мови FORTRAN ". N n r");

cprintf (" Студента групи А-513 n n r ");

cprintf (" Бойко Костянтина Анатолійовича. N n r ");

cprintf ("У програмі використані клавіші: n r ");

cprintf (" F1 - даний Help. N r ");

cprintf (" F2 - граматика мови. N r ");

cprintf (" F3 - мова оператора. N r ");

cprintf (" F4 - компіляція файлу. N r ");

cprintf (" ESC - вихід з програми. N n r ");

cprintf (" Для виходу з Help натисніть будь-яку клавішу. "); p> getch ();

}

// Граматика.

void Grammar (void)

{

window (10,2,70,23);

textattr (46);

clrscr ();

Windows (10,2,70,23, "Grammar");

window (12,4,68,22);

cprintf ("1. <Оператор> -> IF (<АВ>) , , n r ");

cprintf ("2. -> <ЦБЗ> n r ");

cprintf ("3. <АВ> -> T | <АВ> + T | <АВ>-T n r ");

cprintf ("4. T -> O | T * O | T/O | T ** O n r ");

cprintf ("5. O -> (<АВ>) | <Ідентифікатор> | <ЧПЗ> n r ");

cprintf ("6. <Ідентифікатор> -> Б {Б | Ц} n r ");

cprintf ("7. <ЦБЗ> -> Ц {Ц} n r ");

cprintf ("8. <ЧПЗ> -> Ц {Ц} [. Ц {Ц}] n n r ");

cprintf ("Умовні позначення: n r ");

cprintf ("T - Терм. N r ");

cprintf ("O - Операнд. N r ");

cprintf ("Б - Буква. N r ");

cprintf ("Ц - Цифра. N r ");

cprintf ("ЦБЗ - ціле без знака. n r ");

cprintf ("ЧПЗ - число з плаваючою комою. n r ");

cprintf ("** - Зведення в ступінь. N r ");

cprintf (" - Мітка. N r ");

cprintf ("<АВ> - арифметичний вираз. ");

getch ();

}

// Мова.

void Language (void)

{

window...