با سلام و خسته نباشی خدمت اعضای گروه کدی که من نوشتم کد قاعده کرامر برای حل سه معادله سه مجهول است،منتها یه اشکال در این کد است، موقعی من کد را ران میکنم فقط یه جواب از سه جواب را به من می دهد.اگه امکان داره یه نگاهی بهش بندازین و اشکالش را درج کنین.با تشکر.

 #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();
 
 }