• <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精品久久久久久久久久| 亚洲精品无码久久千人斩| 久久综合久久综合久久综合| 青青青青久久精品国产h| 99久久综合狠狠综合久久| 色播久久人人爽人人爽人人片AV| 亚洲中文字幕无码久久2020| 99热热久久这里只有精品68| 伊人久久综合成人网| 国产成人综合久久精品尤物| 午夜精品久久久久久影视riav| 久久99国产精品久久久| 久久精品国产99国产精品导航| 日本道色综合久久影院| 日韩精品久久无码中文字幕| 久久天天躁狠狠躁夜夜av浪潮| 国产69精品久久久久777| 久久久久久精品无码人妻| 久久精品综合一区二区三区| 久久se精品一区二区| 久久亚洲私人国产精品| 亚洲国产精品成人AV无码久久综合影院 | 久久久精品国产Sm最大网站| 日韩精品久久久久久免费| 日韩中文久久| 久久精品国产亚洲Aⅴ蜜臀色欲| 99精品国产在热久久无毒不卡| 欧美黑人激情性久久| 模特私拍国产精品久久| 欧美久久亚洲精品| 久久久久婷婷| 欧美久久亚洲精品| 久久人妻无码中文字幕| 久久91精品国产91| 久久AV高潮AV无码AV| 国产aⅴ激情无码久久| 无码人妻久久一区二区三区蜜桃| 久久久久亚洲av毛片大 | 精品久久久无码人妻中文字幕| 一级做a爰片久久毛片免费陪| 天天影视色香欲综合久久|