{

　　}

　　main

　　{

　　int b[20],num;

　　num=jsvalue(b);

　　writeDat(num,b);

　　}

　　writeDat(int num,int b[])

　　{

　　FILE *out;

　　int i;

　　out=fopen(\"out.dat\",\"w\");

　　fprintf(out,\"%d\\n\",num);

　　for(i=0;i

　　fclose(out);

　　}

　　-------------------------------------

　　注：注意在i==(int)sqrt(i)*(int)sqrt(i)中只有當i是完全平方數時開平方后再取整才不會丟失任何數據。

　　{

　　int i,j,k=0,g,s,b;

　　for(i=100;i<=999;i++)

　　{

　　g=i;

　　s=i/10;

　　b=i/100;

　　if((i==(int)sqrt(i)*(int)sqrt(i))&&(g==s//s==b//b==g))

　　bb[k++]=i;

　　}

　　return k;

　　}

　　{

　　int i,k=0;

　　for(i=100;i<=999;i++)

　　if((int)sqrt(i)*(int)sqrt(i)==i && (i/100==i || i/100==i/10 || i/10==i))

　　bb[k++]=i;

　　return k;

　　}

　　設有n個人圍坐一圈并按順時針方向從1到n編號, 從第s個人開始進行1到m的報數, 報數到第m個人, 此人出圈, 再從他的下一個人重新開始1到m的報數, 如此進行下去直到所有的人都出圈為止。

　　現要求按出圈次序, 每10人一組, 給出這n個人的順序表。請考生編制函數Josegh()實現此功能并調用函數WriteDat()把結果p輸出到文件JOSE.OUT中。

　　設 n = 100, s = 1, m = 10。

　　(1) 將1到n個人的序號存入一維數組p中;

　　(2) 若第i個人報數后出圈, 則將p[i]置于數組的倒數第i個位置上, 而原來第i+1個至倒數第i個元素依次向前移動一個位置;

　　(3) 重復第(2)步直至圈中只剩下p[1]為止。

　　注意: 部分源程序存放在PROG1.C中。

　　請勿改動主函數main()和輸出數據函數WriteDat()的內容。

　　初始化：

　　#define N 100

　　#define S 1

　　#define M 10

　　int p[100], n, s, m ;

　　void WriteDat(void) ;

　　void Josegh(void)

　　{

　　}

　　void main()

　　{

　　m = M ;

　　n = N ;

　　s = S ;

　　Josegh() ;

　　WriteDat() ;

　　}

　　void WriteDat(void)

　　{

　　int i ;

　　FILE *fp ;

　　fp = fopen("jose.out", "w") ;

　　for(i = N - 1 ; i >= 0 ; i--) {

　　printf("M ", p[i]) ;

　　fprintf(fp, "M", p[i]) ;

　　if(i % 10 == 0) {

　　printf("\n") ;

　　fprintf(fp, "\n") ;

　　}

　　}

　　fclose(fp) ;

　　}

　　本題評析：

　　參考答案及其注釋如下：

　　void Josegh(void)

　　{

　　int i,j,s1,w;

　　s1 = s;

　　for(i = 1; i <= n; i++)

　　p[i-1] = i; /*初始化賦值*/

　　for(i = n; i>=1; i--)

　　{

　　s1 = (s1 + m - 1)%i;

　　if(s1 == 0)s1 = i;

　　w = p[s1 - 1];

　　for(j = s1; j < i; j++)

　　p[j - 1] = p[j];

　　p[i - 1] = w;

　　}

　　}

　　s　開始　m　周期　n　總數