求一fortran或C语言程序,求6个元素的所有6个元素的组合.

#include
void printChar(char s,int n)
{
int i;
for(i=0;iprintf("%c",s);
}
void main()
{
char s[6];
int a[6];
int i;
scanf("%s",s);
for(a[0]=0;a[0]<7;a[0]++)
for(a[1]=0;a[1]<7;a[1]++)
for(a[2]=0;a[2]<7;a[2]++)
for(a[3]=0;a[3]<7;a[3]++)
for(a[4]=0;a[4]<7;a[4]++)
for(a[5]=0;a[5]<7;a[5]++)
if(a[0]+a[1]+a[2]+a[3]+a[4]+a[5]==6)
{
for(i=0;i<6;i++)
{
printChar(s[i],a[i]);
}
printf("n");
}
}

用的方法比较傻，效率也不高，见笑了...