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

{n=0;

Y=1;

viewwin(n,YWINDOW);

}

else n++;

break;

}

}

}

void viewwin(int num,int numline)

{clrscr();

for(int a=0;a<numline;a++)

{gotoxy(1,a+1);

cprintf("%s",cordinat[num++]);

}

}

void putmistake(int n)

{int offtemp,x=1,y=1;

if((offtemp=mistake[n][0])==END)

{cprintf("%s",type_mis[0]);

}

else

{for(int k=0;mistake[n][k]!=END;k++)

{offtemp=mistake[n][k];

if(offtemp==13) cprintf("%s\n",type_mis[offtemp]);

else

{cprintf("%d.%s\n",k+1,type_mis[offtemp]);

x++;

y++;