BZOJ3534 矩阵树

#include<bits/stdc++.h>
using namespace std; 
const int N=55;
double a[N][N],A[N][N];
void gauss(int n){
	for(int i=1;i<=n;++i){
		for(int j=i;j<=n;++j){
			if(fabs(a[j][i])>1e-8){
				for(int k=1;k<=n;++k)swap(a[i][k],a[j][k]);
			}
		}
		for(int j=1;j<=n;++j){
			if(i==j)continue;
			double rate=a[j][i]/a[i][i];
			for(int k=i;k<=n;++k)a[j][k]-=a[i][k]*rate;
		}
	}
}
int main(){
	int n;
	cin>>n;
	for(int i=1;i<=n;++i)for(int j=1;j<=n;++j)cin>>a[i][j];
	double ans=1;
	for(int i=1;i<=n;++i)for(int j=i;j<=n;++j)ans=ans*(1-a[i][j]);
	for(int i=1;i<=n;++i)for(int j=1;j<=n;++j)a[i][j]=a[i][j]/(1-a[i][j]);
	for(int i=1;i<=n;++i){
		for(int j=1;j<=n;++j){
			if(i!=j)a[i][i]-=a[i][j];
		}
	}
	gauss(n-1);
	for(int i=1;i<n;++i)ans=ans*a[i][i];
	printf("%.10lf\n",fabs(ans));
}

洛谷上WA了，上述写法精度有问题

#include<bits/stdc++.h>
using namespace std; 
const int N=55;
const double eps=1e-12;
double a[N][N];
void gauss(int n){
    for(int i=1;i<=n;++i){
        int mx=i;
        for(int j=i+1;j<=n;j++){
            if(fabs(a[j][i])>fabs(a[mx][i]))mx=j;
        }
        if(mx!=i)for(int j=1;j<=n;j++)swap(a[i][j],a[mx][j]);
        for(int j=1;j<=n;++j){
            if(i==j)continue;
            double rate=a[j][i]/a[i][i];
            for(int k=i;k<=n;++k)a[j][k]-=a[i][k]*rate;
        }
    }
}
int main(){
    int n;
    cin>>n;
    for(int i=1;i<=n;++i)for(int j=1;j<=n;++j)scanf("%lf",&a[i][j]);
    for(int i=1;i<=n;i++){
        for(int j=1;j<=n;j++){
            if(fabs(a[i][j])<eps)a[i][j]=eps;
            if(fabs(1.0-a[i][j])<eps)a[i][j]=1-eps;
        }
    }
    double ans=1;
    for(int i=1;i<=n;++i)for(int j=i+1;j<=n;++j)ans=ans*(1-a[i][j]);
    for(int i=1;i<=n;++i)for(int j=1;j<=n;++j)a[i][j]=a[i][j]/(1-a[i][j]);
    for(int i=1;i<=n;++i){
        for(int j=1;j<=n;++j){
            if(i!=j)a[i][i]-=a[i][j];
        }
    }
    gauss(n-1);
    for(int i=1;i<n;++i)ans=ans*a[i][i];
    printf("%.10lf\n",fabs(ans));
}

BZOJ和洛谷都A的版本

#include<bits/stdc++.h>
using namespace std; 
const int N=55;
const double eps=1e-8;
double a[N][N];
void gauss(int n){
	for(int i=1;i<=n;++i){
		int mx=i;
        for(int j=i+1;j<=n;j++){
            if(fabs(a[j][i])>fabs(a[mx][i]))mx=j;
        }
        if(mx!=i)for(int j=1;j<=n;j++)swap(a[i][j],a[mx][j]);
		for(int j=1;j<=n;++j){
			if(i==j)continue;
			double rate=a[j][i]/a[i][i];
			for(int k=i;k<=n;++k)a[j][k]-=a[i][k]*rate;
		}
	}
}
int main(){
	int n;
	cin>>n;
	for(int i=1;i<=n;++i)for(int j=1;j<=n;++j)scanf("%lf",&a[i][j]);
	for(int i=1;i<=n;i++){
        for(int j=1;j<=n;j++){
            if(fabs(a[i][j])<eps)a[i][j]=eps;
            if(fabs(1.0-a[i][j])<eps)a[i][j]=1-eps;
        }
    }
	double ans=1;
	for(int i=1;i<=n;++i)for(int j=i+1;j<=n;++j)ans=ans*(1-a[i][j]);
	for(int i=1;i<=n;++i)for(int j=1;j<=n;++j)a[i][j]=a[i][j]/(1-a[i][j]);
	for(int i=1;i<=n;++i){
		for(int j=1;j<=n;++j){
			if(i!=j)a[i][i]-=a[i][j];
		}
	}
	gauss(n-1);
	for(int i=1;i<n;++i){
		if(fabs(a[i][i])<eps)ans=0;
		else ans=ans*a[i][i];
	}
	printf("%.10lf\n",fabs(ans));
}