Advertisement
aka_A

Untitled

Nov 13th, 2019
98
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.44 KB | None | 0 0
  1. # include <stdio.h>
  2. # include "conio.h"
  3. # include "math.h"
  4. void nhap(float *a, int n,int m);
  5. void xuatmt(float *a, int n,int m);
  6. main()
  7. { float a[10][10];
  8. float x[10],m,s;
  9. char tt;
  10. int n,i,j,k;
  11. while (1) {
  12. printf("\n Nhap n= "); scanf("%d",&n);
  13.  
  14. printf("\n Nhap he so cua he phuong trinh:\n");
  15. for (i=1;i<=n; ++i)
  16. for (j=1;j<=n+1;++j) {
  17. printf(" pt[%d%d]=",i,j);
  18. scanf("%f",&m);
  19. a[i][j]=m;
  20. }
  21.  
  22. for (i=1;i<=n; i++) {
  23. printf("\n");
  24. for (j=1;j<=n+1;j++) printf("%.3f ",a[i][j]);
  25. }
  26. /* bien doi A ve ma tran tam giac tren */
  27. for(i=1;i<n;i++)
  28. for(j=i+1;j<=n;j++) {
  29. m=-a[j][i]/a[i][i];
  30. for(k=i;k<=n+1;k++) a[j][k]+=a[i][k]*m;
  31. }
  32. printf("\n");
  33. for (i=1;i<=n; i++) {
  34. printf("\n");
  35. for (j=1;j<=n+1;j++) printf("%.3f ",a[i][j]);
  36. }
  37. /* tim nghiem theo qtrinh nguoc */
  38. for(i=n;i>=1;i--) {
  39. s=a[i][n+1];
  40. for(k=i+1;k<=n;k++) s-=a[i][k]*x[k];
  41. x[i]=s/a[i][i];
  42. }
  43. printf("\nNghiem he phtrinh:");
  44. for(i=1;i<=n;i++) printf("%.3f ",x[i]);
  45. printf("\n\n Ban tiep tuc ko(c/k)?");
  46. tt=getch();
  47. if (tt!='c') break;}
  48. }
  49. /* Ham nhap mang a(m,n)*/
  50. void nhap(float *a, int n,int m)
  51. { int i,j;
  52. printf("\n Nhap he so cua he phuong trinh:\n");
  53. for (i=1;i<=m; i++)
  54. for (j=1;j<=n;j++) {
  55. printf(" pt[%d%d]=",i,j);
  56. scanf("%f",a+i*n+j);
  57. }
  58. }
  59. /* Ham xuat mang a(m,n)*/
  60. void xuatmt(float *a, int n,int m)
  61. { int i,j;
  62. for (i=1;i<=m; i++) {
  63. printf("\n");
  64. for (j=1;j<=n;j++) printf("%.3f ",*(a+i*n+j));
  65. }
  66. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement