Реферат: Оператор присваивания языка FORTRAN

fcloseall();

}

// MENU

int MENU(char *s)

{int dy,n;

dy=line-1;

textbackground(WHITE);

textcolor(YELLOW);

window(1,1,80,25);

clrscr();

gotoxy(2,1);

cprintf(" SDenis\n ");

gotoxy(2,2);

cputs(s);

gotoxy(2,3);

cprintf("Используйте курсор вверх/вниз для выбора просматриваемой строки.\n");

gotoxy(2,4);

cprintf("<ENTER> - для просмотра ошибок в строке(строка выделяется). \n");

gotoxy(2,5);

cprintf("<ESC> - выход.\n");

gotoxy(2,6);

textbackground(WHITE);

textcolor(RED);

cprintf("******************** ОШИБКИ В СТРОКАХ *************************\n");

textbackground(WHITE);

textcolor(YELLOW);

gotoxy(2,19);

cprintf("******************* СТРОКИ ВАШЕГО ФАЙЛА ****************************\n");

window(X1,Y1,X2,Y2);