• <ins id="pjuwb"></ins>
    <blockquote id="pjuwb"><pre id="pjuwb"></pre></blockquote>
    <noscript id="pjuwb"></noscript>
          <sup id="pjuwb"><pre id="pjuwb"></pre></sup>
            <dd id="pjuwb"></dd>
            <abbr id="pjuwb"></abbr>
            posts - 100,  comments - 15,  trackbacks - 0
            #include<iostream>
            #include
            <math.h>
            using namespace std;
            #define MAX 100

            double A[MAX+1][MAX+1];
            double B[MAX+1];
            double X[MAX+1];
            double Z[MAX+1];
            int D[MAX+1]; //未知變量位置的變化
            int n;
            int e;

            void input()
            {
                
            int i,j;

                printf(
            "n:");
                scanf(
            "%d",&n);

                printf(
            "A[][]:\n");
                
            for(i=1;i<=n;i++)
                    
            for(j=1;j<=n;j++)
                        scanf(
            "%lf",&A[i][j]);

                printf(
            "B[]:\n");
                
            for(i=1;i<=n;i++)
                    scanf(
            "%lf",&B[i]);

                printf(
            "e:");
                scanf(
            "%lf",&e);
            }


            void SwapE(double a,double b)    //swap elements
            {
                
            double T;
                T
            =a;
                a
            =b;
                b
            =T;
            }


            void  SwapR(int k,int kmi)
            {
                
            int j;
                
            for(j=k;j<=n;j++)
                    SwapE(A[k][j],A[kmi][j]);
            }


            void SwapC(int k,int kmj)
            {
                
            int i;
                
            for(i=k;i<=n;i++)
                    SwapE(A[i][k],A[i][kmj]);
            }


            void AllGaussianElimination()
            {
                
            int kmi,kmj;//the i and j of the max(abs) element when k
                int i,j,k;
                
            double T;

                
            for(i=1;i<=n;i++)//初始化位置變量位置
                    D[i]=i;

                
            for(k=1;k<=n-1;k++)
                
            {
                    
            //選主元
                    T=0;
                    
            for(i=k;i<=n;i++)
                        
            for(j=k;j<=n;j++)
                            
            if(fabs(A[i][j])>T) { T=fabs(A[i][j]); kmi=i;kmj=j;}

                    
            if(T<=e) {printf("Error!\n"); return ;}

                    
            if(kmi!=k) { SwapR(k,kmi);  SwapE(B[k],B[kmi]); }
                    
            if(kmj!=k) { SwapC(k,kmj);  SwapE(D[k],D[kmj]); }
                    
            //消元
                    for(i=k+1;i<=n;i++)
                    
            {
                        T
            =A[i][k]/A[k][k];
                        B[i]
            -=T*B[k];

                        
            for(j=k;j<=n;j++)
                            A[i][j]
            -=T*A[k][j];
                    }

                    
            //回代
                    if(A[n][n]<=e) {printf("Error!\n");return ;}
                    Z[n]
            =B[n]/A[n][n];
                    
                    
            double S_Aij_Zj;
                    
            for(i=n-1;i>=1;i--)
                    
            {
                        S_Aij_Zj
            =0;
                        
            for(j=i+1;j<=n;j++)
                            S_Aij_Zj
            +=A[i][j]*Z[j];

                        Z[i]
            =(B[i]-S_Aij_Zj)/A[i][i];
                    }


                    
            for(j=1;j<=n;j++)
                        X[D[j]]
            =Z[j];
                }

            }


            void print(double X[])
            {
                
            int i;
                printf(
            "X[]:\n");
                
            for(i=1;i<=n;i++)
                    printf(
            "%f\n",X[i]);
            }


            int main()
            {
                input();
                AllGaussianElimination();
                print(X);
                system(
            "pause");
                
            return 0;
            }
            posted on 2009-05-16 16:37 wyiu 閱讀(805) 評論(0)  編輯 收藏 引用 所屬分類: 數值分析
            久久精品国产亚洲av麻豆图片 | 欧美一区二区精品久久| A狠狠久久蜜臀婷色中文网| 国产精品一区二区久久精品| 人妻无码精品久久亚瑟影视| 久久精品国产99国产精品导航| 久久亚洲精品中文字幕| 久久天天躁狠狠躁夜夜2020| 久久99精品久久久久久久不卡| 日本免费久久久久久久网站| 久久久久青草线蕉综合超碰| 91久久精品视频| 91精品国产综合久久久久久| 97精品依人久久久大香线蕉97| 精品久久久久久久久免费影院 | 久久综合久久伊人| 久久99亚洲网美利坚合众国| 久久无码专区国产精品发布| 久久久久久亚洲精品无码| 欧美日韩中文字幕久久伊人| 无码精品久久久久久人妻中字| 一极黄色视频久久网站| 一本一道久久a久久精品综合| 精品久久久久久无码专区| 精品国产乱码久久久久久呢| 欧美激情精品久久久久久久| 国产精品免费久久| 99久久综合国产精品免费| 久久99精品国产麻豆不卡| 久久精品国产WWW456C0M| 久久国产乱子精品免费女| 91久久精一区二区三区大全| 久久无码人妻一区二区三区| 无码人妻久久一区二区三区免费| 五月丁香综合激情六月久久| 久久水蜜桃亚洲av无码精品麻豆 | 精品免费久久久久久久| 亚洲AV日韩精品久久久久久| 日产精品久久久久久久| 国产精品天天影视久久综合网| 伊人久久综在合线亚洲2019|