• <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 閱讀(615) 評論(0)  編輯 收藏 引用 所屬分類: 數值分析
            国产成人精品久久一区二区三区av| 久久美女网站免费| 午夜精品久久久久久影视riav | 久久人人爽人爽人人爽av| 久久天天躁狠狠躁夜夜不卡 | 欧美va久久久噜噜噜久久| 老司机国内精品久久久久| 欧美成人免费观看久久| 久久国产色AV免费观看| 久久这里只有精品视频99| 久久精品九九亚洲精品| 无码精品久久一区二区三区| 国产成人无码久久久精品一| 久久久久无码精品| 久久伊人精品青青草原高清| 久久久国产99久久国产一| 日本免费一区二区久久人人澡| 区久久AAA片69亚洲| 久久精品国产精品亚洲| 精品久久久久久中文字幕| 久久婷婷色综合一区二区| 久久99精品国产麻豆婷婷| 国产精品免费看久久久| 午夜天堂精品久久久久| 一级做a爰片久久毛片看看| 精品国产综合区久久久久久| 97久久精品无码一区二区天美| 久久99久久99精品免视看动漫| 久久综合亚洲色HEZYO国产 | 亚洲精品乱码久久久久久蜜桃不卡| 精品久久久无码中文字幕| 久久777国产线看观看精品| 久久久久免费看成人影片| 色综合久久久久无码专区 | 99久久精品毛片免费播放| 伊人久久大香线蕉av一区| 99精品国产99久久久久久97| 99久久做夜夜爱天天做精品| 久久婷婷午色综合夜啪| 人妻无码αv中文字幕久久琪琪布 人妻无码精品久久亚瑟影视 | 亚洲AV无码1区2区久久 |