给定每个人的家庭成员和其自己名下的房产，请你统计出每个家庭的人口数、人均房产面积及房产套数。
输入格式：
输入第一行给出一个正整数N（≤1000），随后N行，每行按下列格式给出一个人的房产：
编号 父 母 k 孩子1 ... 孩子k 房产套数 总面积
其中编号是每个人独有的一个4位数的编号；父和母分别是该编号对应的这个人的父母的编号（如果已经过世，则显示-1）；k（0≤k≤5）是该人的子女的个数；孩子i是其子女的编号。
输出格式：
首先在第一行输出家庭个数（所有有亲属关系的人都属于同一个家庭）。随后按下列格式输出每个家庭的信息：
家庭成员的最小编号 家庭人口数 人均房产套数 人均房产面积
其中人均值要求保留小数点后3位。家庭信息首先按人均面积降序输出，若有并列，则按成员编号的升序输出。
输入样例：
10
6666 5551 5552 1 7777 1 100
1234 5678 9012 1 0002 2 300
8888 -1 -1 0 1 1000
2468 0001 0004 1 2222 1 500
7777 6666 -1 0 2 300
3721 -1 -1 1 2333 2 150
9012 -1 -1 3 1236 1235 1234 1 100
1235 5678 9012 0 1 50
2222 1236 2468 2 6661 6662 1 300
2333 -1 3721 3 6661 6662 6663 1 100
输出样例：
3
8888 1 1.000 1000.000
0001 15 0.600 100.000
5551 4 0.750 100.000
代码如下：
#include<iostream>
#include<cstdio>
#include<algorithm>
#include<string>
#include<cstring>
#include<queue>
#include<stack>
#include<cmath>
#include<set>
#include<map>
using namespace std;
#define ll long long
#define lson l,m,rt<<1
#define rson m+1,r,rt<<1|1
typedef pair<int,int>P;
const int INF=0x3f3f3f3f;
const int N=10005,mod=32767;
struct A{int N,S;}peo[N];
int pre[100005],vis[100005],vis2[100005];
struct B{int seq,pn,fn,sn;double a1,a2;};
B ans[1005];
int dui[100005];
int fi(int x){
if(pre[x]==x)return pre[x];
pre[x]=fi(pre[x]);
return pre[x];
}
int link(int a,int b){
int r1=fi(a),r2=fi(b);
if(r1<=r2)pre[r2]=r1;
else pre[r1]=r2;
}
bool cmp(B a,B b){
if(a.a2==b.a2)return a.seq<b.seq;
else return a.a2>b.a2;
}
int main(){
int n,k,me,f,m,tmp;
scanf("%d",&n);
memset(peo,0,sizeof(peo));
for(int i=0;i<100000;i++)pre[i]=i;
for(int i=1;i<=n;i++){
scanf("%4d%4d%4d%d",&me,&f,&m,&k);
vis[me]=vis[f]=vis[m]=1;
if(f!=-1)link(me,f);
if(m!=-1)link(me,m);
while(k--){
scanf("%4d",&tmp);
link(me,tmp);
vis[tmp]=1;
}
scanf("%d%d",&peo[me].N,&peo[me].S);
}
int q=0;
for(int i=0;i<100000;i++){
if(!vis[i])continue;
int root=fi(i);
if(!vis2[root]){
ans[q++].seq=i;
vis2[root]=1;
dui[i]=q-1;
}
}
cout<<q<<endl;
for(int i=0;i<100000;i++){
if(!vis[i])continue;
ans[dui[pre[i]]].pn++;
if(peo[i].N){
ans[dui[pre[i]]].fn+=peo[i].N;
ans[dui[pre[i]]].sn+=peo[i].S;
}
}
for(int i=0;i<q;i++){
ans[i].a1=(double)ans[i].fn/ans[i].pn;
ans[i].a2=(double)ans[i].sn/ans[i].pn;
}
sort(ans,ans+q,cmp);
for(int i=0;i<q;i++){
printf("%04d %d %.3f %.3f\n",ans[i].seq,ans[i].pn,ans[i].a1,ans[i].a2);
}
}（胡乱写的，写的很恶心……）