• <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 e;
            int n;

            void ColGaussianElimination()
            {
                
            int i,j,k,kmi;
                
            double T;
                
            for(k=1;k<=n-1;k++)
                
            {
                    
            //選主元
                    T=0;
                    
            for(i=k;i<=n;i++)
                        
            if( fabs(A[i][k])> T ){ T=A[i][k];kmi=i;}
                    
            if( T<=e) { printf("Error!\n"); return ;}
                    
            if(kmi!=k)
                    
            {
                        T
            =B[k];B[k]=B[kmi];B[kmi]=T; //swap B[k] and B[kmi]
                        for(j=k;j<=n;j++//swap row kmi and k of A
                        {
                            T
            =A[k][j];
                            A[k][j]
            =A[kmi][j];
                            A[kmi][j]
            =T;
                        }

                    }

                    
            //消元
                    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( fabs(A[n][n])<=e ) { printf("Error!\n"); return ;}

                X[n]
            =B[n]/A[n][n];

                
            double S_Aij_Xj;
                
            for(i=n-1;i>=1;i--)
                
            {
                    S_Aij_Xj
            =0;
                    
            for(j=i+1;j<=n;j++)
                        S_Aij_Xj
            +=A[i][j]*X[j];

                    X[i]
            =(B[i]-S_Aij_Xj)/A[i][i];
                }

            }

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


            int main()
            {
                
            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);

                ColGaussianElimination();
                print(X);
                system(
            "pause");
                
            return 0;
            }


            posted on 2009-05-16 16:34 wyiu 閱讀(620) 評論(0)  編輯 收藏 引用 所屬分類: 數值分析
            久久精品国产免费观看三人同眠| 亚洲国产一成人久久精品| 国产成人无码精品久久久久免费 | 久久男人Av资源网站无码软件| 久久久久亚洲精品日久生情 | 久久精品国产久精国产思思| 久久99精品国产| 久久婷婷五月综合成人D啪| 国内精品久久九九国产精品| 亚洲国产综合久久天堂 | 久久夜色精品国产噜噜噜亚洲AV | 久久夜色精品国产www| 中文字幕乱码人妻无码久久| 精品久久久久久无码国产| 人妻无码αv中文字幕久久 | 怡红院日本一道日本久久| 最新久久免费视频| 大伊人青草狠狠久久| 伊人久久大香线蕉av不变影院| AAA级久久久精品无码区| 国产V综合V亚洲欧美久久| 久久久一本精品99久久精品88| 草草久久久无码国产专区| 久久国产乱子精品免费女| 伊人久久综合成人网| 亚洲精品无码专区久久同性男| 国产精品成人精品久久久| 久久久久免费精品国产| 久久精品人人做人人妻人人玩| 欧美一级久久久久久久大片| 国产精品欧美久久久久无广告 | 欧美亚洲国产精品久久| 欧美日韩精品久久久免费观看| 国产精品gz久久久| 久久av免费天堂小草播放| 国产高清美女一级a毛片久久w| 好久久免费视频高清| 午夜不卡888久久| 国内精品久久久久影院网站 | 久久久av波多野一区二区| 欧美黑人又粗又大久久久 |