home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Flop Magazin 37
/
Flop_Magazin_37_1995_05_Raster_cs_Side_A.atr
/
part3.c
< prev
next >
Wrap
Text File
|
2023-02-26
|
2KB
|
1 lines
/* NERVY - PART3.C¢reseni ulohy NERVY z casopisu¢12.12.1995 - 30.1.1996¢*/¢#define HEADER "\n************ NERVY **************\n\n"¢#define OPENERR "Can't open '%s'!\n\n"¢¢int mati[10][10];¢char cisla[200][2][11];¢int mat,cisl;/* pointery na soubory */¢¢/* nacteni rodnych cisel ze souboru */¢int int_rc()¢{¢ int i,y;¢ char s[15];¢¢ printf("\n\tNacitani souboru cisel\n");¢ if((cisl=copen("D1:CISLA.DAT",'r'))<0)¢ {¢ printf(OPENERR,"CISLA.DAT");¢ pauza();¢ return(-1);¢ }¢¢ for(y=0;y<2;y++)¢ for(i=0;i<200;i++)¢ { if(cgets(cisl,s) != 1)¢ { printf ("\nDelka souboru je kratka ");¢ return(0);¢ }¢¢ strcpy(&cisla[i][y][0],s);¢ }¢¢ cclose(cisl);¢ printf("\n%s\tdruhy:%s\n",s,&cisla[i-1][y-1][0]);¢ printf("\n%s\tbez &:%s\n",s,cisla[i-1][y-1][0]);¢¢ return(1);¢}¢¢edit()¢{ int mu,a;¢ printf("\nVolana inicializace matice\n");¢ a = int_mat();¢ if(a<1)¢ if(a == -1)¢ printf("\nDatovy soubor s matici nenalezen!\n"); ¢ else¢ printf("\nDatovy soubor s matici je nejak kratky!\n");¢¢ printf("\nVolana funkce nacteni rodnych cisel\n");¢ a = int_rc();¢ if(a<1)¢ if(a == -1)¢ printf("\nDatovy soubor s cisly nenalezen!\n");¢ else¢ printf("\nDatovy soubor s cisly je nejak kratky!\n");¢¢ do{¢ switch(menu()) {¢ case 'v':¢ case 'V':¢ kalk();¢ break;¢ case 'm':¢ case 'M':¢ matice();¢ break;¢ case 'r':¢ case 'R':¢ zad_cisla();¢ break;¢ case 'n':¢ case 'N':¢ oprav();¢ break;¢ case 'q':¢ case 'Q':¢ mu='Q';¢ printf ("\nNavrat na zacatek\n");¢ break;¢ default:¢ printf ("\nSpatna volba - opakuj\n");¢ break;¢ }¢ }while(mu!='Q');¢ return;¢}¢¢¢main()¢{¢ char a[100];¢ char *p82;¢ p82 = 82; /*levy okraj*/¢ *p82 = 1;¢¢ do {¢ printf(HEADER);¢ pauza();¢ edit();¢ printf("\nNavrat do MAIN\n");¢ pauza();¢ printf("\nOpusteni programu - Q <RETURN>\n");¢ gets(a);¢ if(a[0]=='Q')¢ a[0]='q';¢ }while(a[0]!='q');¢}¢