Άλλα μηνύματα του μέλους praktor000 σε αυτό το thread

/*Pragmatwsi epilogis: Dimiourgia monadiaiou pinaka */
case 3: {
    /*Diavazoume poses grammes tha exei o pinakas*/
    printf("Dwse ton arithmo twn grammwn tou pinaka : \n");
    scanf("%d",&grammes);
    /*Diavazoume poses sthles tha exei o pinakas*/
    printf("Dwse ton arithmo twn sthlwn tou pinaka : \n");
    scanf("%d",&sthles);
    if (grammes==sthles)
    {
        /*Dimiourgei ena monadiaio pinaka*/
        monadiaios_pinakas(&pinakas, grammes, sthles);
    }
    else
    {
        printf("Dwsate lanthasmena dedomena - Dokimaste pali: \n");
        exit(1);
    }
    break;
        }

/*Dimiourgei tis theseis tou pinaka*/
void make_pinaka(double ***pinaka, int grammes, int sthles)
{
    int i,j;
    if (grammes>0 && sthles>0)
    {
        *pinaka=(double **)malloc(grammes*sizeof(double*));
        for (i=0;i<grammes;i++)
        {
            pinaka[i]=(double *)malloc(sthles*sizeof(double));
        }
    }
    else
    {
        printf("Dwsate lanthasmena dedomena - Dokimaste pali");
    }
}

/*Dimiourgei ena monadiaio pinaka*/
void monadiaios_pinakas(double ***pin, int grammes, int sthles)
{
    int i, j;
    double **pinakas;
    make_pinaka(&pinakas,grammes,sthles);
    for (i=0;i<grammes;i++)
    {
        for (j=0;j<sthles;j++)
        {
            if (i==j)
            {
                pinakas[i][j]=1;
            }
        }
    }
    *pin=pinakas;
}