成都麻将胡牌规则
描述:   
说起麻将，那可是川渝市民的最爱，无论亲朋好友聚会，还是业务谈判，总是少不了麻将的声音。
成都麻将只能包括3种类型：条，筒，万。没有“门、东南西北、红中”。
每种牌都是数字从1到9，每个数字有4张，共36张。筒，万，条均一样。
胡牌简化规则如下：
1.必须有一个对子，即两张相同的牌，比如：两个2筒，两个4条等。
2.剩余的牌，每3张需要凑成一个有效牌，比如：3个一样的牌(3个2筒)，或者3个顺子(1条2条3条)，如果所有的牌都能够凑好，再满足规则2和1，有一个对子，并且所有的牌只有两种类型，那么就可以胡牌了。
3.假设牌不会出现碰的情况，即输入的牌肯定是13张。
4.输入牌肯定都是麻将牌，不用考虑异常输入；也不用考虑会输入“门”，“红中”等成都麻将中不会出现的牌。
5.条用T表示，D用D表示，万用W标识。
6.不用考虑输入的合法性，这个由函数的使用者保证。输入的牌为字符串，字母为大写的TDW”
 
要求根据13个已知输入，判断可以胡那几张牌。
 
运行时间限制:    无限制
内存限制:    无限制
输入:   
输入13张麻将牌，如"1T8T6W6W5D4W1T3W6W2W5D6T1T"

 
输出:   
输出胡牌个数和要胡的牌，
其中胡牌个数占一行输出，胡哪一张牌占一行输出，
胡多张牌，输出数促按照T/D/W的顺序从小到大排列（如1T5T6D7D3W8W）。
1
7T
样例输入:   
1T8T6W6W5D4W1T3W6W2W5D6T1T
样例输出:   
1
7T
答案提示:   
 
*此处为必选项

#include <stdio.h>
#include <stdlib.h>
#include<string.h>
int main()
{
    int i,j,e,r,m,x,ti,wi,di,t[28]={0},u=0,w[28]={0},d[28]={0};
    char p[29],re[28];
    gets(p);
for(e=1;e<=9;e++)
    {
        memset(w,0,28*sizeof(int));memset(d,0,28*sizeof(int));memset(t,0,28*sizeof(int));
        r=0;m=0;ti=0;wi=0;di=0;
        p[26]=e;p[27]='T';
    for(i=1;i<28;i+=2)
    {
        if(p[i]=='T'){t[ti]=p[i-1];ti++;}
        else if(p[i]=='W'){w[wi]=p[i-1];wi++;}
        else if(p[i]=='D'){d[di]=p[i-1];di++;}
    }
    for(i=0;i<26;i++)printf("%d",w[i]);
    for(i=0;i<wi;i++)for(j=i+1;j<wi;j++)
    {
        if(w[j]>w[i]){x=w[i];w[i]=w[j];w[j]=x;}
    }
    for(i=0;i<26;i++)printf("%d",w[i]);
    for(i=0;i<di;i++)for(j=i+1;j<di;j++)
    {
        if(d[j]>d[i]){x=d[i];d[i]=d[j];d[j]=x;}
    }for(i=0;i<ti;i++)for(j=i+1;j<ti;j++)
    {
        if(t[j]>t[i]){x=t[i];t[i]=t[j];t[j]=x;}
    }
    for(i=0;i<wi-2;i++)
    if(w[i+1]*2==w[i]+w[i+2]){w[i]=0;w[i+1]=0;w[i+2]=0;}
     for(i=0;i<di-2;i++)
    if(d[i+1]*2==d[i]+d[i+2]){d[i]=0;d[i+1]=0;d[i+2]=0;}
    for(i=0;i<ti-2;i++)
    if(t[i+1]*2==t[i]+t[i+2]){t[i]=0;t[i+1]=0;t[i+2]=0;}
    for(i=0;i<wi-1;i++)
    if(w[i]==w[i+1]&&w[i]!=0){m++; }
    for(i=0;i<di-1;i++)
    if(d[i]==d[i+1]&&d[i]!=0){m++;}
    for(i=0;i<ti-1;i++)
    if(t[i]==t[i+1]&&t[i]!=0){m++;}
    if(m==1){r++;}
    for(i=0;i<wi;i++){if(w[i]!=0)r++;}
    for(i=0;i<di;i++){if(d[i]!=0)r++;}
    for(i=0;i<ti;i++){if(t[i]!=0)r++;}
    if(r==1){re[u]=e;re[u+1]='T';u+=2; }
    }
for(e=1;e<=9;e++)
    {r=0;m=0;ti=0;wi=0;di=0;memset(w,0,28*sizeof(int));memset(d,0,28*sizeof(int));memset(t,0,28*sizeof(int));
        p[26]=e;p[27]='D';
    for(i=1;i<28;i+=2)
    {
        if(p[i]=='T'){t[ti]=p[i-1];ti++;}
        else if(p[i]=='W'){w[wi]=p[i-1];wi++;}
        else if(p[i]=='D'){d[di]=p[i-1];di++;}
    }
    for(i=0;i<wi;i++)for(j=i+1;j<wi;j++)
    {
        if(w[j]>w[i]){x=w[i];w[i]=w[j];w[j]=x;}
    }for(i=0;i<di;i++)for(j=i+1;j<di;j++)
    {
        if(d[j]>d[i]){x=d[i];d[i]=d[j];d[j]=x;}
    }for(i=0;i<ti;i++)for(j=i+1;j<ti;j++)
    {
        if(t[j]>t[i]){x=t[i];t[i]=t[j];t[j]=x;}
    }
    for(i=0;i<wi-2;i++)
    if(w[i+1]*2==w[i]+w[i+2]){w[i]=0;w[i+1]=0;w[i+2]=0;}
     for(i=0;i<di-2;i++)
    if(d[i+1]*2==d[i]+d[i+2]){d[i]=0;d[i+1]=0;d[i+2]=0;}
    for(i=0;i<ti-2;i++)
    if(t[i+1]*2==t[i]+t[i+2]){t[i]=0;t[i+1]=0;t[i+2]=0;}
    for(i=0;i<wi-1;i++)
    if(w[i]==w[i+1]&&w[i]!=0){m++; }
    for(i=0;i<di-1;i++)
    if(d[i]==d[i+1]&&d[i]!=0){m++;}
    for(i=0;i<ti-1;i++)
    if(t[i]==t[i+1]&&t[i]!=0){m++;}
    if(m==1){r++;}
    for(i=0;i<wi;i++){if(w[i]!=0)r++;}
    for(i=0;i<di;i++){if(d[i]!=0)r++;}
    for(i=0;i<ti;i++){if(t[i]!=0)r++;}
    if(r==1){re[u]=e;re[u+1]='D';u+=2; }
    }
for(e=1;e<=9;e++)
    {r=0;m=0;ti=0;wi=0;di=0;memset(w,0,28*sizeof(int));memset(d,0,28*sizeof(int));memset(t,0,28*sizeof(int));
        p[26]=e;p[27]='W';
    for(i=1;i<28;i+=2)
    {
        if(p[i]=='T'){t[ti]=p[i-1];ti++;}
        else if(p[i]=='W'){w[wi]=p[i-1];wi++;}
        else if(p[i]=='D'){d[di]=p[i-1];di++;}
    }
    for(i=0;i<wi;i++)for(j=i+1;j<wi;j++)
    {
        if(w[j]>w[i]){x=w[i];w[i]=w[j];w[j]=x;}
    }for(i=0;i<di;i++)for(j=i+1;j<di;j++)
    {
        if(d[j]>d[i]){x=d[i];d[i]=d[j];d[j]=x;}
    }for(i=0;i<ti;i++)for(j=i+1;j<ti;j++)
    {
        if(t[j]>t[i]){x=t[i];t[i]=t[j];t[j]=x;}
    }
    for(i=0;i<wi-2;i++)
    if(w[i+1]*2==w[i]+w[i+2]){w[i]=0;w[i+1]=0;w[i+2]=0;}
     for(i=0;i<di-2;i++)
    if(d[i+1]*2==d[i]+d[i+2]){d[i]=0;d[i+1]=0;d[i+2]=0;}
    for(i=0;i<ti-2;i++)
    if(t[i+1]*2==t[i]+t[i+2]){t[i]=0;t[i+1]=0;t[i+2]=0;}
    for(i=0;i<wi-1;i++)
    if(w[i]==w[i+1]&&w[i]!=0){m++; }
    for(i=0;i<di-1;i++)
    if(d[i]==d[i+1]&&d[i]!=0){m++;}
    for(i=0;i<ti-1;i++)
    if(t[i]==t[i+1]&&t[i]!=0){m++;}
    if(m==1){r++;}
    for(i=0;i<wi;i++){if(w[i]!=0)r++;}
    for(i=0;i<di;i++){if(d[i]!=0)r++;}
    for(i=0;i<ti;i++){if(t[i]!=0)r++;}
    if(r==1){re[u]=e;re[u+1]='W';u+=2; }
    }
    if(u!=0)
    {
        printf("%d\n",u/2);
        re[u]='\0';
        for(i=0;re[i]!='\0';i+=2)
        {
            printf("%d%c\n",re[i],re[i+1]);
        }
    }
    else printf("0\n");
    return 0;
}
应该错了很多，希望大家帮忙改改

感觉你这个代码比较重复，应该可以精简一下。

自己无聊改了一下，代码减为 80 行。

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

int main( void )
{
    const char suit_name[] = "TDW";
    char pai[3][15], pai_bak[3][15];
    int suite_index[3];
    char inp_str[29], res_str[28];
    int res_index = 0;
    int suit, num;
    int tmp_suit;
    int match3, match2;
    int i, j, temp;
   
    printf( "Input str: " );
    gets( inp_str );
    inp_str[28] = 0;
    for ( suit = 0; suit < 3; suit ++ ) {
        for ( num = 1; num <= 9; num++ ) {
            memset( pai, 0, sizeof pai );
            memset( suite_index, 0 , sizeof suite_index );
            inp_str[26] = num + '0';
            inp_str[27] = suit_name[suit];
            for ( i = 1; i < 28; i += 2 ) {
                tmp_suit = strchr( suit_name, inp_str[i] ) - suit_name;
                pai[tmp_suit][suite_index[tmp_suit]++] = inp_str[i - 1];
            }
            for ( tmp_suit = 0; tmp_suit < 3; tmp_suit++ ) {
                for ( i = 0; i < suite_index[tmp_suit]; i++ ) {
                    for ( j = i + 1; j < suite_index[tmp_suit]; j++ ) {
                        if ( pai[tmp_suit][i] > pai[tmp_suit][j] ) {
                            temp = pai[tmp_suit][i];
                            pai[tmp_suit][i] = pai[tmp_suit][j];
                            pai[tmp_suit][j] = temp;
                        }
                    }
                }
            }
            memcpy( pai_bak, pai, sizeof pai );

            match3 = match2 = 0;
            for ( tmp_suit = 0; tmp_suit < 3; tmp_suit++ ) {
                i = 0;
                while ( i < suite_index[tmp_suit] - 1 ) {
                    unsigned a = pai[tmp_suit][i + 1] - pai[tmp_suit][i];
                    unsigned b = pai[tmp_suit][i + 2] - pai[tmp_suit][i + 1];
                    if ( a == b && a < 2 ) {
                        for ( j = 0; j < 3; j++ )
                            pai[tmp_suit][i++] = 0;
                        match3++;
                    } else if ( a == 0 ) {
                        for ( j = 0; j < 2; j++ )
                            pai[tmp_suit][i++] = 0;
                        match2++;
                    } else {
                        i++;
                    }
                }
            }
            if ( match3 == 4 && match2 == 1 ) {
                res_str[res_index++] = num;
                res_str[res_index++] = suit_name[suit];
                printf ( "Solve:\n" );
                for ( tmp_suit = 0; tmp_suit < 3; tmp_suit++ ) {
                    printf ( "%c: %s\n", suit_name[tmp_suit], pai_bak[tmp_suit] );
                }
            }
        }
    }
    printf( "Results: %d\n", res_index / 2 );
    if ( res_index != 0 ) {
        res_str[res_index] = '\0';
        for ( i = 0; res_str[i] != '\0'; i += 2 ) {
            printf( "%d%c\n", res_str[i], res_str[i + 1] );
        }
    }
    return 0;
}

简单测试：

R:\>a
Input str: 1T8T6W6W5D4W1T3W6W2W5D6T1T
Solve:
T: 111678
D: 55
W: 234666
Results: 1
7T

R:\>a
Input str: 1T5T6W6W5D4W1T3W6W2W5D6T1T
Solve:
T: 111456
D: 55
W: 234666
Solve:
T: 111567
D: 55
W: 234666
Results: 2
4T
7T

其实只能说和楼主的代码想达到的结果一致，还不是很完善。