第十二套C語言上機試題

　　一、改錯題

　�、賹⒃�第二行的int fact(int n)改為int fact(int n,int m[ ])

　　②將原第九行的kc=kc/10;改為kc=k/10;

　�、蹖⒃�第十九行的scanf("%c",&n);改為scanf("%d",&n);

　�、軐⒃�第二十二行的if(fact(n,a))改為if(!fact(n,a))

　　二、編程題

　　#include

　　#include

　　#include

　　void fun(char xx[])

　　{int len,i,j=0,k;

　　len=strlen(xx);

　　while(xx[j])

　　if(isdigit(xx[j]))

　　{for(i=len;i>=j;i--)

　　xx[i+1]=xx[i];

　　xx[j]='$';

　　j+=2;

　　len++; }

　　else j++;}

　　main()

　　{char s[80];

　　FILE *fp;

　　if((fp=fopen("A:\\myf2.out","w"))= =NULL)

　　{printf("Can not open file!"); exit(1);}

　　scanf("%s",s);

　　fun(s);

　　fprintf(fp,"The result is:%s\n",s);

　　fclose(fp); }