Problem:
連鎖

問題

次のようなゲームがある．

あるキャラクターが縦 1 列に N 個並んでいる．これらのキャラクターの色は赤，青，黄のいずれかであり，初期状態で同じ色のキャラクターが4つ以上連続して並んでいることはない．プレーヤーは，ある位置のキャラクターを選び他の色に変更することができる．この操作により同じ色のキャラクターが4つ以上連続して並ぶとそれらのキャラクターは消滅する．キャラクターが消滅することにより新たに同じ色のキャラクターが4つ以上連続して並ぶとそれらのキャラクターも消滅し，同じ色のキャラクターが4つ以上連続して並んでいる箇所がなくなるまでこの連鎖は続く．このゲームの目的は，消滅しないで残っているキャラクター数をなるべく少なくすることである．

例えば，下図の左端の状態で，上から6番目のキャラクターの色を黄色から青に変更すると，青のキャラクターが5つ連続するので消滅し，最終的に3つのキャラクターが消滅せずに残る．

初期状態における N 個のキャラクターの色の並びが与えられたとき， 1箇所だけキャラクターの色を変更した場合の，消滅しないで残っているキャラクター数の最小値 M を求めるプログラムを作成せよ．

入力

入力は複数のデータセットからなる．各データセットは以下の形式で与えられる．

1行目はキャラクター数 N (1 ≤ N ≤ 10000) だけからなる．続く N 行には 1, 2, 3 のいずれか1つの整数が書かれており， i + 1 行目 (1 ≤ i ≤ N) は初期状態における上から i 番目のキャラクターの色を表す（1 は赤を，2 は青を，3は黄を表す）．

N が 0 のとき入力の終了を示す．データセットの数は 5 を超えない．

出力

データセットごとに, 消滅しないで残っているキャラクター数の最小値 M を１行に出力せよ．

入出力例

入力例

12
3
2
1
1
2
3
2
2
2
1
1
3
12
3
2
1
1
2
3
2
1
3
2
1
3
0

出力例

3
12

上記問題文と自動審判に使われるデータは、情報オリンピック日本委員会が作成し公開している問題文と採点用テストデータです。

Solution in C (judge verdict: Time Limit Exceeded)

#include<stdio.h>
#include<string.h>



#define DEL 4

int N ;

int st ;
int end ;



int max( int a ,int b )
{
	return a > b ? a : b ;
}

void UNION( char *color ,int *rby ,int p ,int BEGIN )
{
	char front[ 10000 + 2 ] ;
	char back[ 10000 + 2 ] ;

	sprintf( back ,"%s" ,color + end ) ;

	color[ st ] = '\0' ;

	sprintf( front ,"%s" ,color ) ;
	sprintf( color ,"%s%s" ,front ,back ) ;

	//printf( "A %s\n%s\n" ,front ,back ) ;
}

int maxP( char *RBY ,int *rby ,int P  ,int *begin )
{
	int ret ;
	int kale ;
	int maxy = 0 ;
	int p ;

	int i ;
	for( i = 1 ; i <= P ; ++i )
	{
		if( rby[ i ] == 1 && RBY[ i - 1 ] == RBY[ i + 1 ] )
		{
			kale = rby[ i - 1 ] + rby[ i ] + rby[ i + 1 ] ;

			if( maxy < kale )
			{
				maxy = kale ;

				st = begin[ i - 1 ] ;
				end = begin[ i ] + rby[ i + 1 ] + 1 ;
			}
		}

		else
		{
			kale = rby[ i ] + 1 ;

			if( maxy < kale )
			{
				maxy = kale ;

				//if( i < P )
				//{
					st = begin[ i ] ;
					end = begin[ i ] + rby[ i ] ;
				//}

			/*	else
				{
					st = begin[ i ] ;
					end = begin[ i ] + rby[ i ] ;
				}*/
			}
		}

		/*
		if( rby[ i ] == 1 && RBY[ i - 1 ] == RBY[ i + 1 ] )
		{
			 kale = rby[ i - 1 ] + rby[ i + 1 ] + 1 ;

		//	 p = i ;

			 //printf( "p = %d kale = %d\n" ,i ,kale ) ;
		}

		else
		{
			kale = rby[ i ] + 1 ;

		//	p = i ;

		//	printf( "p = %d rby = %d\n" ,i ,rby[ i ] ) ;

			/*
			if( rby[ i ] > rby[ i + 1 ] )
			{
				kale = rby[ i ] + 1 ;

				p = i ;
			}

			else
			{
				kale = rby[ i + 1 ] + 1 ;

				p = i + 1 ;
			}
			
		}

		if( maxy < kale )
		{
			maxy = kale ;

			ret = i ;

			if( i == P )
			{
				st = begin[ i ] ;
			}
		}*/
	}
	/*
	if( maxy > 3 )
	{
		if( RBY[ ret - 1 ] == RBY[ ret + 1 ] )
		{
			--ret ;

			end = begin[ i - 1 ] + rby[ ret ] + rby[ ret + 1 ] + rby[ ret + 2 ] ;
		}

		else
		{
			end = begin[ ret ] + maxy ;
			rby[ ret ] = maxy ;
		}
	}

	else
	{
		rby[ ret ] = 3 ;
	}

	if( st == 0 )
	{
		st = 1 ;
	}*/

	return maxy ;

//	printf( "ret = %d kale = %d\n" ,ret ,maxy ) ;

	//return ret ;
}

int CNT( char *color ,char *RBY ,int *rby ,int *begin )
{
	int ret = 0 ;

	int LEN = strlen( color ) ;

	int i ;
	for( i = 1 ; i <= LEN ; ++i )
	{
		if( color[ i ] == color[ i - 1 ] || color[ i ] == color[ i + 1 ] )
		{
			if( RBY[ ret ] != color[ i ] )
			{
				++ret ;
			}

			++rby[ ret ] ;
		}

		else
		{
			++ret ;

			if( rby[ ret ] == 0 )
			{
				rby[ ret ] = 1 ;
			}

			begin[ ret ] = i ;
		}

		RBY[ ret ] = color[ i ] ;
	}

	return ret ;
}


int main( void )
{
	while( 1 )
	{
		scanf( "%d" ,&N ) ;

		if( N == 0 )
		{
			return 0 ;
		}

		int begin[ 10000 + 2 ] = { 0 } ;

		int p = 0 ;

		char RBY[ 10000 + 2 ] = { 0 } ;
		char color[ 10000 + 2 ] = { 0 } ;

		color[ 0 ] = 4 ;
		
		int rby[ 10000 + 2 ] = { 0 } ;

		int i ;
		for( i = 1 ; i <= N ; ++i )
		{
			scanf( "%*c%c" ,color + i ) ;
		}//printf( "%s\n" ,color ) ;

		for( i = 1 ; i <= N ; ++i )
		{
			if( color[ i ] == color[ i - 1 ] || color[ i ] == color[ i + 1 ] )
			{
				//printf( "%c%c%c\n" ,color[ i - 1 ] ,color[ i ] ,color[ i + 1 ] ) ;

				if( color[ i ] != RBY[ p ] )
				{
					++p ;
				}

				++rby[ p ] ;
			}

			else
			{
				++p ;

				if( rby[ p ] == 0 )
				{
					rby[ p ] = 1 ;
				}

				begin[ p ] = i ;
			}

			RBY[ p ] = color[ i ] ;
		}//printf( "%s\n" ,color) ;puts("") ;

		//printf( "%s\n" ,RBY + 1 ) ;

		int Len = 0 ;

		/*for( i = 1 ; i <= p ; ++i )
		{
			printf( "rby = %d " ,rby[ i ] ) ;
		}puts( "" ) ;*/
		
		while( Len != strlen( color ) )
		{
			//int st ;

			Len = strlen( color ) ;

			if( DEL > maxP( RBY ,rby ,p  ,begin ) )break;
		//	printf( "\n%d\n" ,p ) ;

		//	printf( "st %d %d\n" ,st ,begin[ p ] ) ;

			UNION( color ,rby ,st ,begin[ p ] ) ;

				//printf( "%s\n" ,color ) ;
		//	printf( "%s\n" ,color ) ;

			memset( RBY ,0 ,sizeof RBY ) ;
			memset( rby ,0 ,sizeof rby ) ;

			p = CNT( color ,RBY ,rby ,begin ) ;

			//break ;
		}

		//printf( "%d %d\n" ,Len ,strlen( color ) ) ;
		
		printf( "%d\n" ,strlen( color ) - 1 ) ;
	}
}