Курсовая работа: Калькулятор для матриць

{

int i,j;

double **A,**C,a,as,ad,d,h;

int n=Convert::ToInt32(textBox4->Text);

A=new double*[n];

C=new double*[n];

for(i=0;i<n;i++)

{

A[i]=new double[n];

C[i]=new double[n];

}

GET_ARRAY(textBox1->Text,A,n);

d=DET(A,n);

if(d!=0)

{

for(i=0;i<n;i++)

for(j=0;j<n;j++)

{

h=1/d;

a=A[i][j];

ad=ALG_DOP(A,n,i,j);

as=a*ad;

C[i][j]=h*as;

}

}

TRANSP_ARRAY(C,n);

double sum=0,mus=0,S=0;

for(i=0;i<n;i++)

{