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 <algorithm>
using namespace std;

int main()
{
	int N;
	while(scanf("%d", &N), N)
	{
		int hei=0;
		bool f[5005][5]={0};
		
		while(N--)
		{
			int d,p,q;
			scanf("%d%d%d", &d,&p,&q);
			p--; q--;
			
			int h=hei+1;
			while(1)
			{
				if(h==0) break;
				bool g=true;
				for(int i=q; i<=q+(d==1?p:0); i++)
				{
					if(f[h-1][i]) 
					{
						g=false;
						break;
					}
				}
				if(!g) break;
				h--;
			}
			hei=max(hei, h+(d==1?0:p));
			for(int i=h; i<=h+(d==1?0:p); i++)
			for(int j=q; j<=q+(d==1?p:0); j++)
			{
				f[i][j]=1;
			}
			
			for(int i=h; i<=hei; i++)
			{
				while(1)
				{
					bool g=true;
					for(int j=0; j<5; j++)
					{
						if(f[i][j]==0)
						{
							g=false;
							break;
						}
					}
					if(!g) break;
					
					for(int k=i; k<=hei+1; k++)
					for(int j=0; j<5; j++)
					{
						f[k][j]=f[k+1][j];
						f[k+1][j]=0;
					}
					hei--;
				}
			}
			

		}
		
		int cnt=0;
		for(int i=0; i<5; i++)
		for(int j=0; j<=hei; j++)
		{
			if(f[j][i]) cnt++;
		}
			
		printf("%d\n", cnt);
	}
}

C++: #include <iostream>
#include <vector>
#include <algorithm>

using namespace std;

int main(){

	int n;
	while(cin>>n&&n!=0){
		char field[10][5];
		for(int i = 0; i < 10; i++)
			for(int j = 0; j < 5; j++)
				field[i][j]='0';
		int d,p,q;
		for(int i = 0; i < n; i++){
			cin>>d>>p>>q;
			if(d==1){
				int init=q-1;
				int at=10000000;
				for(int j = init; j < p+init; j++){
					for(int k = 0; k < 10; k++){
						if(field[k][j]=='1'){
							at=min(at,k-1);
							break;
						}
						else if(k==9){
							at=min(at,k);
							break;
						}
					}
				}
				// atÌÀWÌ³ÉubNð¨­
				for(int j = init; j < p+init; j++){
					field[at][j]='1';
				}
			}
			else{
				int at=10000000;
				for(int k = 0; k < 10; k++){
					if(field[k][q-1]=='1'){
						at=k-1;
						break;
					}
					else if(k==9)
						at=k;
				}
				//ubNð¨­
				for(int j = at; j!=at-p; j--){
					field[j][q-1]='1';
				}
			}
			bool er=false;
			// ubNÌÁ
			for(int j = 0; j < 10; j++){
				bool f=false;
				for(int k = 0; k < 5; k++){
					if(field[j][k]!='1'){
						f=true;
						break;
					}
				}
				if(!f){
					er=true;
					for(int k = 0; k < 5; k++)
						field[j][k]='0';
					// Á¦½sæèãÉ éubNðº
					for(int k = j-1; k >= 0; k--){
						for(int l = 0; l < 5; l++){
							field[k+1][l]=field[k][l];
						}
						//for(int l = 0; l < 5; l++){
					//	int empPlace=-1;
					//	for(int k = j; k >= 0; k--){
					//		if(field[k][l]=='1'){
					//			for(int m = k+1; m < 10; m++){
					//				if(field[m][l]=='0'&&(m==9||field[m+1][l]=='1')){
					//					field[m][l]=='1';
					//					field[k][l]='0';
					//					break;
					//				}
					//			}
					//		}
					//	}
					//}
					}
				}
			}
			if(er){


				//// ubNÌº
				//for(int j = 0; j < 5; j++){
				//	if(i==3&&j==3){
				//		//	cout<<endl;
				//	}
				//	int empPlace=-1;
				//	for(int k = 9; k >= 0; k--){
				//		if(field[k][j]=='1'){
				//			if(k==9){
				//				continue;
				//			}
				//			else if(empPlace!=-1){
				//				field[empPlace][j]='1';
				//				field[k][j]='0';
				//				empPlace=empPlace-1;
				//			}
				//		}
				//		else{
				//			if(empPlace==-1)
				//				empPlace=k;
				//		}
				//	}
				//}
			}
			//for(int j = 0; j < 10; j++){
			//	for(int k = 0; k < 5; k++){
			//		cout<<field[j][k]<<flush;
			//	}
			//	cout<<endl;
			//}
			//cout<<endl;
		}
		int cnt=0;
		for(int i = 0; i < 10; i++){
			for(int j = 0; j < 5; j++){
				if(field[i][j]=='1')
					cnt++;
			}
		}
		cout<<cnt<<endl;
	}

	return 0;
}

C++: #include<iostream>
using namespace std;
int A[5000][5];
int x[5],y[5];
main()
{
	int N;
	while(cin>>N,N)
	{
		for(int i=0;i<5000;i++)for(int j=0;j<5;j++)A[i][j]=0;
		for(int i=0;i<N;i++)
		{
			int d,p,q;cin>>d>>p>>q;
			if(d==1)
			{
				for(int j=0;j<p;j++)
				{
					x[j]=4999;
					y[j]=q+j-1;
				}
			}
			else
			{
				for(int j=0;j<p;j++)
				{
					x[j]=4999-j;
					y[j]=q-1;
				}
			}
			while(true)
			{
				for(int j=0;j<p;j++)x[j]--;
				bool flag=false;
				for(int j=0;j<p;j++)
				{
					if(x[j]<0||A[x[j]][y[j]])flag=true;
				}
				if(flag)break;
			}
			for(int j=0;j<p;j++)A[++x[j]][y[j]]=1;
			for(int j=0;j<p;j++)
			{
				int X=x[j];
				bool flag=true;
				for(int k=0;k<5;k++)flag&=A[X][k];
				if(flag)
				{
					for(int k=X+1;k<5000;k++)for(int l=0;l<5;l++)A[k-1][l]=A[k][l];
				}
			}
		}
		int ans=0;
		for(int i=0;i<5000;i++)for(int j=0;j<5;j++)ans+=A[i][j];
		cout<<ans<<endl;
	}
}

C++: #include <iostream>
#include <math.h>

using namespace std;

int main() {
	int i,j,n,a,b,c,d,e,f,g,m[10000];
	while(cin >> n) {
		if (n==0) break;
		for (j=0;j<10000;j++) m[j]=0; d=0;
		for (i=0;i<n;i++) {
			cin >> a >> b >> c;
			f=a >1 ? 1 << (c-1) : ((1 << b)-1)  << (c-1);  
			for (j=d;j>=0;j--) if ( m[j]+f != (m[j] | f)) break;
			e=g=j+1;
			if (a==1) { m[e]+=f; d++;}  else for (j=0;j<b;j++) { m[e+j]+=f; d+=b;}
			for (j=g; j<g+d+1; j++) if (m[j]<31) m[e++]=m[j];
		}
		f=0;
		for (i=0;i<5000;i++) for (j=0;j<5;j++) f+=(m[i] & ( 1 << j))>0;
		cout << f << endl;
	}
	return 0;
}