سوال و جواب ها با برچسب دلایل خشک کار کردن زانتیا

 #include<stdio.h>
 
 #include<conio.h>
 
 #include<math.h>
 
 main()
 
 {
 
 int i,j,k,l,m=0,y,u,r;
 
 float d,determ=1.0,a[3][3],b[3],x[3],c[3][3],deltam[3],delta=1.0,p[3][3],q[3];
 
 for(i=0;i<=2;i++)
 
 {
 
  for(j=0;j<=2;j++)
 
  {
 
   printf("matris a");
 
   scanf("%f",&a[i][j]);
 
   }
 
   }
 
   for(l=0;l<=2;l++)
 
   {
 
    printf("bordar b");
 
    scanf("%f",&b[l]);
 
    }
 
    for(i=0;i<=2;i++)
 
    {
 
    for(j=0;j<=2;j++)
 
    {
 
    c[i][j]=a[i][j];
 
    }}
 
 for(i=0;i<2;i++)
 
 {
 
 for(j=i+1;j<=2;j++)
 
 {
 
 d=c[j][i]/c[i][i];
 
 for(k=0;k<=2;k++)
 
 {
 
 c[j][k]=c[j][k]-(d*c[i][k]);
 
 }
 
 }
 
 }
 
 for(i=0;i<=2;i++)
 
 {
 
 for(j=0;j<=2;j++)
 
 {
 
 if(i==j)
 
 determ=determ*c[i][j];
 
 }
 
 }
 
 for(y=0;y<=2;y++){
 
 for(u=0;u<=2;u++){
 
 p[y][u]=a[y][u];
 
 }}
 
 for(j=0;j<=2;j++)
 
 {
 
 for(i=0;i<=2;i++)
 
 {
 
 for(l=0;l<=2;l++)
 
 {
 
 if(i==l)
 
 {
 
  p[i][j]=b[l];
 
  if(l==2 && m<=2)
 
  {
 
   for(i=0;i<2;i++)
 
 {
 
 for(j=i+1;j<=2;j++)
 
 {
 
 d=p[j][i]/p[i][i];
 
 for(k=0;k<=2;k++)
 
 {
 
 p[j][k]=p[j][k]-(d*p[i][k]);
 
 }
 
 }
 
 }
 
 for(i=0;i<=2;i++)
 
 {
 
 for(j=0;j<=2;j++)
 
 {
 
 if(i==j){
 
 delta=delta*p[i][j];
 
 }
 
 }}
 
 deltam[m]=delta;
 
 x[m]=(deltam[m])/(determ);
 
 for(r=0;r<=2;r++){
 
 if(r==m){
 
 q[r]=x[m];
 
 } }
 
 m=m+1;
 
 for(y=0;y<=2;y++){
 
 for(u=0;u<=2;u++){
 
 p[y][u]=a[y][u];
 
 }}
 
 }
 
 }
 
 }
 
 }}
 
  for(r=0;r<=2;r++){
 
  printf("%f",q[r]);
 
  }
 
 getch();
 
 }