P4035 [JSOI2008]球形空间产生器

我们可以根据球面上任意一点到球心的距离相等来列方程组

设球心为((x_1,x_2,x_3……x_n))，题目中给出的第(i)个点的坐标为((a_{i.1},a_{i,2}……a_{i,n}))

可以得出(sumlimits_{j=0}^n(a_{i,j}-x_j)^2=c)

这个方程组是由(n)个(n)元(2)次方程所得,不是线性方程组

我们可以通过相邻的两个方程做差，将它变成线性方程组

这里可以自己用二维的为例算一下^_^

最后得到的矩阵为

(egin{bmatrix}2(a_{1,1}-a_{2,1}) 2(a_{1,2}-a_{2,2}) …… sumlimits_{j=1}^{n}(a^2_{1,j}-a^2_{2,j})\2(a_{2,1}-a_{3,1}) 2(a_{2,2}-a_{3,2}) …… sumlimits_{j=1}^{n}(a^2_{2,j}-a^2_{3,j})\2(a_{3,1}-a_{4,1}) 2(a_{3,2}-a_{4,2}) …… sumlimits_{j=1}^{n}(a^2_{3,j}-a^2_{4,j})\……\2(a_{n,1}-a_{n+1,1}) 2(a_{n,2}-a_{n+1,2}) …… sumlimits_{j=1}^{n}(a^2_{n,j}-a^2_{n+1,j})end{bmatrix})

题目中保证了方程组有唯一解，所有直接对上述矩阵进行高斯消元即可

关于初等行交换的一些问题

• 初等行交换可以防止当前(i)位置出现(0)详见这个讨论
• 有(double)进行高斯消元时，初等行交换可以减小误差

进行高斯消元时对两行消
需要除以其中一行的第一个数字
如果这个数字接近(0)
那得到的数字就会很大
(double)精度会出问题
如果把还没有消的行中第一个数字比较大的换上来
除的时候就可以避免精度问题

以上内容来自学长wxyww有个(nb)的学长是真滴爽，什么时候我也能像学长这么(nb)

#include<bits/stdc++.h>
using namespace std;
const int N=25;
double a[N][N],b[N],c[N][N];
int n; 
int main()
{
	freopen("sphere9.in","r",stdin);
//	freopen(".out","w",stdout);
	cin>>n;
	for(int i=1;i<=n+1;++i)
		for(int j=1;j<=n;++j)
			cin>>a[i][j];
	for(int i=1;i<=n;++i)
	{
		for(int j=1;j<=n;++j)
		{
			c[i][j]=2*(a[i][j]-a[i+1][j]);
			b[i]+=a[i][j]*a[i][j]-a[i+1][j]*a[i+1][j];
		}
	}
	for(int i=1;i<=n;i++)
	{
		for(int j=i;j<=n;++j)
		{
			if(fabs(c[j][i])>1e-8)
			{
				for(int k=1;k<=n;++k) swap(c[i][k],c[j][k]);
				swap(b[i],b[j]);
			}
		}
		for(int j=1;j<=n;++j)
		{
			if(i==j) continue;
			double rate=c[j][i]/c[i][i];
			for(int k=i;k<=n;++k) c[j][k]-=c[i][k]*rate;
			b[j]-=b[i]*rate;
		}
	}
	for(int i=1;i<=n;++i) printf("%.13lf 
",b[i]/c[i][i]);
	return 0;
}