家庭房产

L2-3 家庭房产 （25 分)

给定每个人的家庭成员和其自己名下的房产，请你统计出每个家庭的人口数、人均房产面积及房产套数。

输入格式：

输入第一行给出一个正整数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 <bits/stdc++.h>

using namespace std;
const int maxn=1e5+6;
struct node{
    int tot,pos,pn;
    double s;
}tmp[maxn],*p[maxn];
int n,k,s,t,fa[maxn],vis[maxn],dis;
int fd(int o){
    return o==fa[o]?o:fa[o]=fd(fa[o]);
}
void mg(int u,int v){
       u=fd(u),v=fd(v);
       if(u!=v){
            if(u>v)swap(u,v);
            fa[v]=u;
       }
}
bool cmp(node *a,node *b){
      if(a->s/a->pn!=b->s/b->pn)return a->s/a->pn>b->s/b->pn;
      else return a->pos<b->pos;
}
int main()
{
    cin>>n;
    for(int i=0;i<maxn;i++)fa[i]=i;
    for(int i=1;i<=n;i++){
         int k,pre,f,m;
         cin>>pre>>f>>m>>k;
         vis[pre]=1;
         if(f!=-1){
               mg(f,pre);
               vis[f]=1;
         }
         if(m!=-1){
               mg(m,pre);
               vis[m]=1;
         }
         for(int j=1;j<=k;j++){
              cin>>f;
              mg(f,pre);
              vis[f]=1;
         }
         cin>>tmp[pre].tot>>tmp[pre].s;
    }
    for(int i=0;i<maxn;i++){
        if(!vis[i])continue;
        int now=fd(i);
        if(i==now){
            tmp[i].pn++;
            tmp[i].pos=i;
            p[++dis]=&tmp[i];
            continue;
        }
        tmp[now].tot+=tmp[i].tot;
        tmp[now].s+=tmp[i].s;
        tmp[now].pn++;
    }
    sort(p+1,p+1+dis,cmp);
    cout<<dis<<endl;
    for(int i=1;i<=dis;i++){
        printf("%04d %d %.3f %.3f\n",p[i]->pos,p[i]->pn,p[i]->tot/(double)p[i]->pn,p[i]->s/(double)p[i]->pn);
    }
    return 0;
}