【bzoj 1013】 球形空间产生器sphere 【JSOI2008】

Description

　　有一个球形空间产生器能够在n维空间中产生一个坚硬的球体。现在，你被困在了这个n维球体中，你只知道球
面上n+1个点的坐标，你需要以最快的速度确定这个n维球体的球心坐标，以便于摧毁这个球形空间产生器。

Input

　　第一行是一个整数n(1<=N=10)。接下来的n+1行，每行有n个实数，表示球面上一点的n维坐标。每一个实数精确到小数点
后6位，且其绝对值都不超过20000。

Output

　　有且只有一行，依次给出球心的n维坐标（n个实数），两个实数之间用一个空格隔开。每个实数精确到小数点
后3位。数据保证有解。你的答案必须和标准输出一模一样才能够得分。

Sample Input

2
0.0 0.0
-1.0 1.0
1.0 0.0

Sample Output

0.500 1.500

HINT

　　提示：给出两个定义：1、 球心：到球面上任意一点距离都相等的点。2、 距离：设两个n为空间上的点A, B

的坐标为(a1, a2, …, an), (b1, b2, …, bn)，则AB的距离定义为：dist = sqrt( (a1-b1)^2 + (a2-b2)^2 + 

… + (an-bn)^2 )

这道题首先设球心坐标为(x1,x2,...,xn)，然后根据距离定义可以得到n+1个二次方程，接下来将第2~n+1个方程分别减去第一个方程，这样就得到了n个一次方程，最后用高斯消元解方程即可，下面是程序：

#include<stdio.h>
#include<iostream>
using namespace std;
struct Point{
	double x[15];
}m[15];
double a[15][15],s[15];
double abs(double n){
	return n>0?n:-1*n;
}
int main(){
	int n,i,j,k;
	scanf("%d",&n);
	for(i=0;i<=n;i++){
		for(j=1;j<=n;j++){
			scanf("%lf",&m[i].x[j]);
		}
	}
	for(i=1;i<=n;i++){
		for(j=1;j<=n;j++){
			a[i][j]=2*(m[i].x[j]-m[0].x[j]);
			s[i]+=m[i].x[j]*m[i].x[j]-m[0].x[j]*m[0].x[j];
		}
	}
	for(i=1;i<=n;i++){
		int tp=i;
		for(j=i;j<=n;j++){
			if(abs(a[j][i])>abs(a[tp][i])){
				tp=j;
			}
		}
		if(tp!=i){
			for(j=i;j<=n;j++){
				swap(a[i][j],a[tp][j]);
			}
			swap(s[i],s[tp]);
		}
		for(j=i+1;j<=n;j++){
			double x=a[j][i]/a[i][i];
			for(k=i;k<=n;k++){
				a[j][k]-=a[i][k]*x;
			}
			s[j]-=s[i]*x;
		}
	}
	for(i=n;i>=1;i--){
		for(j=i+1;j<=n;j++){
			s[i]-=s[j]*a[i][j];
		}
		s[i]/=a[i][i];
	}
	for(i=1;i<n;i++){
		printf("%.3lf ",s[i]);
	}
	printf("%.3lf",s[i]);
	return 0;
}