• <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>

            編程求解行列式的值

                計算行列式最基本的方法就是將行列式化成上三角或者下三角的形式,然后將主對角線上的元素逐個相乘,便能得到整個行列式的值det(A)。根據(jù)這一思想,可以用程序語言來模擬這個過程,設(shè)該行列式的階數(shù)為n。
                由于無論是上三角或者下三角形式的行列式,它的值都只與主對角線上的元素有關(guān)。這樣我們遍歷所有的a[i][i],i=1,2,...,n。如果a[i][i]=0,那么從行數(shù)j>i的一行中找出一個不為0的數(shù)a[j][i],并把第j行的所有元素與第i行的所有元素互換,符號位sign++;如果找不到,則行列式值為0。接下來用a[i][i]將其之后的元素化為0(下三角形式),循環(huán)n次之后主對角線上的乘積便是整個行列式的值。
            #include <cstdio>
            #include 
            <cmath>

            #define MAXN 100
            #define zero(x) (fabs(x)<1e-10)

            struct mat{
                
            int n,m;
                
            double data[MAXN][MAXN];
            }
            ;
            double det(const mat &a){
                
            int i,j,k,sign=0;
                
            double b[MAXN][MAXN],ret=1,t;
                
            if(a.n!=a.m) return 0;
                
            for(i=0;i<a.n;i++)
                    
            for(j=0;j<a.m;j++)
                        b[i][j]
            =a.data[i][j];
                
            for(i=0;i<a.n;i++){//行標(biāo)+列標(biāo)
                    if(zero(b[i][i])){
                        
            for(j=i+1;j<a.n;j++)//行標(biāo)
                            if(!zero(b[j][i]))
                                
            break;
                        
            if(j==a.n) return 0;
                        
            for(k=i;k<a.n;k++)//列標(biāo)
                            t=b[i][k],b[i][k]=b[j][k],b[j][k]=t;
                        sign
            ++;
                    }

                    ret
            *=b[i][i];
                    
            for(k=i+1;k<a.n;k++)//列標(biāo)
                        b[i][k]/=b[i][i];
                    
            for(j=i+1;j<a.n;j++)//行標(biāo)
                        for(k=i+1;k<a.n;k++)//列標(biāo)
                            b[j][k]-=b[j][i]*b[i][k];
                }

                
            if(sign & 1) ret=-ret;
                
            return ret;
            }

            int main(){
                mat a;
                
            int i,j,n;
                
            while(scanf("%d",&n),n){
                    a.n
            =a.m=n;
                    
            for(i=0;i<n;i++)
                        
            for(j=0;j<n;j++)
                            scanf(
            "%lf",&a.data[i][j]);
                    printf(
            "det a : %.2lf\n",det(a));
                }

                
            return 0;
            }

            posted on 2009-06-11 14:21 極限定律 閱讀(1404) 評論(0)  編輯 收藏 引用 所屬分類: ACM/ICPC

            <2009年5月>
            262728293012
            3456789
            10111213141516
            17181920212223
            24252627282930
            31123456

            導(dǎo)航

            統(tǒng)計

            常用鏈接

            留言簿(10)

            隨筆分類

            隨筆檔案

            友情鏈接

            搜索

            最新評論

            閱讀排行榜

            評論排行榜

            日本道色综合久久影院| 少妇被又大又粗又爽毛片久久黑人| 伊人久久大香线焦AV综合影院| 精品久久久久久国产| 久久久久久亚洲精品成人| 久久精品国内一区二区三区| 亚洲精品无码久久久| 久久久久久久亚洲Av无码| 国产日韩欧美久久| 久久精品国产亚洲AV香蕉| 久久av高潮av无码av喷吹| 韩国免费A级毛片久久| 国产精品一区二区久久精品涩爱 | www久久久天天com| 久久久免费观成人影院| 国产精品禁18久久久夂久| 97久久国产综合精品女不卡| 国产99久久久国产精免费| 97久久综合精品久久久综合| 久久久久亚洲AV无码观看| 欧美大战日韩91综合一区婷婷久久青草 | 人人妻久久人人澡人人爽人人精品| 久久国产精品成人片免费| 女人高潮久久久叫人喷水| 久久精品成人一区二区三区| 国产一区二区精品久久| 久久66热人妻偷产精品9| 久久综合噜噜激激的五月天| 日韩欧美亚洲综合久久| 欧美激情一区二区久久久| 亚洲欧洲精品成人久久曰影片 | 久久亚洲国产精品一区二区| 99久久综合狠狠综合久久止| 性欧美大战久久久久久久久| 77777亚洲午夜久久多喷| 99精品国产免费久久久久久下载| 久久亚洲电影| 亚洲七七久久精品中文国产| 人妻无码αv中文字幕久久琪琪布| 色播久久人人爽人人爽人人片aV | 亚洲精品第一综合99久久|