• <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) 評(píng)論(0)  編輯 收藏 引用 所屬分類: 數(shù)值分析
            久久综合九色综合久99| 精品久久久久久国产牛牛app| 中文字幕无码av激情不卡久久| 久久免费观看视频| 人妻丰满AV无码久久不卡| 91精品日韩人妻无码久久不卡 | 狠狠综合久久综合88亚洲| 久久久亚洲欧洲日产国码aⅴ| 国产高潮久久免费观看| 欧美伊人久久大香线蕉综合| 国产成人久久精品二区三区| 久久狠狠爱亚洲综合影院| 久久精品九九亚洲精品天堂| 久久九九兔免费精品6| 国产视频久久| 久久久九九有精品国产| 亚洲精品无码久久一线| 久久久久这里只有精品 | 午夜精品久久久久久久无码| 久久99国产精一区二区三区| 性做久久久久久久| 狠狠色丁香婷婷久久综合| 久久国产高清一区二区三区| 狠狠久久亚洲欧美专区| 91精品国产综合久久久久久| 久久久精品2019免费观看| 狠狠色综合网站久久久久久久高清| 久久精品无码一区二区日韩AV| 色婷婷综合久久久久中文一区二区| 综合久久久久久中文字幕亚洲国产国产综合一区首 | 久久久国产精品网站| AV色综合久久天堂AV色综合在 | 精品熟女少妇AV免费久久| 合区精品久久久中文字幕一区| 久久精品国产只有精品66| 国产免费福利体检区久久 | 亚洲国产精久久久久久久| 久久电影网一区| 国产巨作麻豆欧美亚洲综合久久 | 久久久久免费看成人影片| 亚洲AV无码1区2区久久 |