Go: package main

import (
	"bufio"
	"os"
	"strconv"
	"strings"
	"fmt"
)

var scanner = bufio.NewScanner(os.Stdin)
var (
	dat = [5000][5]int{}
	m = [5]int{}
)

func main() {
	for scanner.Scan() {
		for i := range dat {
			for j := range dat[i] {
				dat[i][j] = 0
			}
		}
		for i := range m {
			m[i] = 0
		}
		n, _ := strconv.Atoi(scanner.Text())
		if n == 0 {
			break
		}
		count := 0
		for i := 0; i < n; i++ {
			scanner.Scan()
			buf := strings.Split(scanner.Text(), " ")
			d, _ := strconv.Atoi(buf[0])
			p, _ := strconv.Atoi(buf[1])
			q, _ := strconv.Atoi(buf[2])
			q--
			count += p
			if d == 2 {
				for j := 0; j < p; j++ {
					dat[m[q]][q] = 1
					ok := true
					for k := 0; k < 5; k++ {
						if dat[m[q]][k] == 0 {
							ok = false
						}
					}
					if ok {
						for k := 0; k < 5; k++ {
							dat[m[q]][k] = 0
							for l := m[q]; l < 4999; l++ {
								dat[l][k] = dat[l+1][k]
							}
							for l := 4999; l >= 0; l-- {
								if dat[l][k] != 0 {
									m[k] = l+1
									break
								}
								if l == 0 {
									m[k] = 0
								}
							}
						}
						count -= 5
					} else {
						m[q]++
					}
				}
			} else {
				h := 0
				for i := 0; i < p; i++ {
					h = max(h, m[i+q])
				}
				for i := 0; i < p; i++ {
					dat[h][i+q] = 1
				}
				for i := 0; i < p; i++ {
					m[i+q] = h+1
				}
				ok := true
				for j := 0; j < 5; j++ {
					if dat[h][j] == 0 {
						ok = false
					}
				}
				if ok {
					for j := 0; j < 5; j++ {
						dat[h][j] = 0
						for k := h; k < 4999; k++ {
							dat[k][j]=dat[k+1][j]
						}
						for k := 4999; k>= 0; k-- {
							if dat[k][j] != 0 {
								m[j]=k+1
								break
							}
							if k == 0 {
								m[j] = 0
							}
						}
					}
					count -= 5
				}
			}
		}
		fmt.Println(count)
	}
}

func max(a, b int) int {
	if a < b {
		return b
	}
	return a
}

C++: #include <cstdio>
#include <iostream>
#include <cstring>

using namespace std;

int map[10000][10];

void del(int y)
{
	for (; y < 9999; y++){
		for (int i = 0; i < 5; i++){
			map[y][i] = map[y + 1][i];
		}
	}
}

int main(void)
{
	int n;
	while (cin >> n, n){
		memset(map, 0, sizeof(map));
		
		for (int i = 1; i <= n; i++){
			int d, p, q;
			
			cin >> d;
			cin >> p;
			cin >> q;
			q--;
			
			if (d == 2){
				int y = 10000 - p;
				while (map[y - 1][q] == 0 && y > 0){
					y--;
				}
				
				for (int j = y; j < y + p; j++){
					map[j][q] = i;
				}
			}
			
			if (d == 1){
				int y = 10000 - p;
				while (1){
					int f = 0;
					
					for (int j = q; j < 5; j++){
						if (map[y - 1][j] != 0){
							f = 1;
							break;
						}
					}
					
					if (f == 1 || y == 0){
						break;
					}
					
					y--;
				}
				
				for (int j = q; j < q + p; j++){
					map[y][j] = i;
				}
			}
			
			int y = 0;
			while (y < 10000){
				int cnt = 0;
				
				for (int j = 0; j < 5; j++){
					cnt += !!map[y][j];
				}
				
				if (cnt == 5){
					del(y);
				}
				else {
					y++;
				}
			}
/*			
			for (int y = 0; y < 20; y++){
				for (int j = 0; j < 5; j++){
					printf("%d ", map[y][j]);
				}
				puts("");
			}
*/
		}
		
		int cnt = 0;
		for (int y = 0; y < 10000; y++){
			for (int j = 0; j < 5; j++){
//				printf("%d ", map[y][j]);
				cnt += !!map[y][j];
			}
			
//			puts("");
		}
		
		printf("%d\n", cnt);
	}
	
	return (0);
}

C++: #include <iostream>
#include <sstream>
#include <string>
#include <vector>
#include <set>
#include <map>
#include <stack>
#include <queue>
#include <algorithm>
#include <numeric>
#include <functional>
#include <cstdio>
#include <cstdlib>
#include <cstring>
#include <cmath>
#include <climits>
using namespace std;

typedef istringstream ISS;
typedef ostringstream OSS;
typedef vector<string> VS;
typedef int INT;
typedef vector<INT> VI;
typedef vector<VI> VVI;
typedef pair <INT, INT> II;
typedef vector <II> VII;

template<class T> ostream& operator << ( ostream& os, vector<T> v ) {
    for ( typename vector<T>::iterator it_i = v.begin(); it_i != v.end(); ++it_i ) {
        os << *it_i << ", ";
    }
    return os;
}


const int SIZE = 1001;
const int HEIGHT = 5001;
int n;
int D[SIZE], P[SIZE], Q[SIZE];
bool B[HEIGHT][5];

int solve() {
    fill( (bool*)B, (bool*)B+HEIGHT*5, false );
    
    
    for ( int i = 0; i < n; ++ i ) {
        int d = D[i], p = P[i], q = Q[i];
        if ( d == 1 ) {
            bool flag2 = true;
            for ( int j = HEIGHT - 1; j >= 0; -- j ) {
                bool flag = false;
                for ( int k = 0; k < p; ++ k ) {
                    if ( B[j][q+k] ) flag = true;
                }
                if ( flag ) {
                    for ( int k = 0; k < p; ++ k ) {
                        B[j+1][q+k] = true;
                    }
                    flag2 = false;
                    break;
                }
            }
            if ( flag2 ) {
                for ( int k = 0; k < p; ++ k ) {
                    B[0][q+k] = true;
                }
            }
        } else if ( d == 2 ) {
            bool flag2 = true;
            for ( int j = HEIGHT - 1; j >= 0; -- j ) {
                bool flag = false;
                for ( int k = 0; k < p; ++ k ) {
                    if ( B[j+k][q] ) flag = true;
                }
                if ( flag ) {
                    for ( int k = 0; k < p; ++ k ) {
                        B[j+k+1][q] = true;
                    }
                    flag2 = false;
                    break;
                }
            }
            if ( flag2 ) {
                for ( int k = 0; k < p; ++ k ) {
                    B[k][q] = true;
                }
            }
        }

        
        
        for ( int j = HEIGHT - 1; j >= 0; -- j ) {
            bool flag = true;
            for ( int k = 0; k < 5; ++ k ) {
                if ( ! B[j][k] ) flag = false;
            }
            if ( flag ) {
                for ( int k = j + 1; k < HEIGHT; ++ k ) {
                    for ( int l = 0; l < 5; ++ l ) {
                        B[k-1][l] = B[k][l];
                    }
                    for ( int l = 0; l < 5; ++ l ) {
                        B[k][l] = false;
                    }
                }
            }
        }

        
    }
    int res = 0;
    for ( int i = 0; i < HEIGHT; ++ i ) {
        for ( int j = 0; j < 5; ++ j ) {
            if ( B[i][j] ) res ++;
        }
    }
    return res;
}

int main() {
    while ( cin >> n && n ) {
        for ( int i = 0; i < n; ++ i ) {
            cin >> D[i] >> P[i] >> Q[i];
            Q[i] --;
        }
        cout << solve() << endl;
    }
    return 0;
}