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

输入格式：

输入第一行给出一个正整数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

万恶的资本家~~

//Asimple
#include <bits/stdc++.h>
#define INF 0xfffffff
#define mod 10007
#define swap(a,b,t) t = a, a = b, b = t
#define CLS(a, v) memset(a, v, sizeof(a))
#define debug(a)  cout << #a << " = "  << a <<endl
using namespace std;
inline int abs(int x) { return x<0?-x:x; }
typedef long long ll;
const int maxn = 10005;
int n, T, num, m, cnt = 0;
int fa[maxn];
bool vis[maxn];

struct node{
    int no;
    int fa;
    int ma;
    int ch[10];
    int num;
    int area;
}a[maxn];
struct ress{
    int id;
    int cnt;
    double num;
    double area;
    bool f = false;
    bool operator < (const ress& a) const{
        if( a.area!=area ) return area>a.area;
        else id<a.id;
    }
}ans[maxn];

int find(int x) {
    while( x!= fa[x]) x =fa[x];
    return x;
}

void make_set(int x, int y) {
    int xx = find(x);
    int yy = find(y);
    if( xx > yy ) fa[xx] = yy;
    else if( xx < yy ) fa[yy] = xx;
}

void solve() {
    for(int i=0; i<n; i++) {
        int mm = find(a[i].no);
        ans[mm].id = mm;
        ans[mm].num += a[i].num;
        ans[mm].area += a[i].area;
        ans[mm].f = true;
    }
    for(int i=0; i<maxn; i++) {
        if( vis[i] ) ans[find(i)].cnt ++;
        if( ans[i].f ) cnt ++;
    }
    for(int i=0; i<maxn; i++) {
        if( ans[i].f ) {
            ans[i].num = (double)(ans[i].num/ans[i].cnt*1.0);
            ans[i].area = (double)(ans[i].area/ans[i].cnt*1.0);
        }
    }
    sort(ans, ans+maxn);
    printf("%d\n", cnt);
    for(int i=0; i<cnt; i++) {
        printf("%04d %d %.3lf %.3lf\n", ans[i].id, ans[i].cnt, ans[i].num, ans[i].area);
    }
}

void input() {
    for(int i=0; i<maxn; i++) fa[i] = i;
    cin >> n;
    for(int i=0; i<n; i++) {
        cin >> a[i].no >> a[i].fa >> a[i].ma >> m;
        vis[a[i].no] = true;
        if( a[i].fa!=-1 ) {
            vis[a[i].fa] = true;
            make_set(a[i].fa, a[i].no);
        }
        if( a[i].ma!=-1 ) {
            vis[a[i].ma] = true;
            make_set(a[i].ma, a[i].no);
        }
        for(int j=0; j<m; j++) {
            cin >> a[i].ch[j];
            vis[a[i].ch[j]] = true;
            make_set(a[i].ch[j], a[i].no);
        }
        cin >> a[i].num >> a[i].area;
    }
    solve();
}

int main() {
    input();
    return 0;
}