{

　　}

　　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)中只有當(dāng)i是完全平方數(shù)時(shí)開(kāi)平方后再取整才不會(huì)丟失任何數(shù)據(jù)。

　　{

　　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;

　　}

　　設(shè)有n個(gè)人圍坐一圈并按順時(shí)針?lè)较驈?到n編號(hào), 從第s個(gè)人開(kāi)始進(jìn)行1到m的報(bào)數(shù), 報(bào)數(shù)到第m個(gè)人, 此人出圈, 再?gòu)乃南乱粋€(gè)人重新開(kāi)始1到m的報(bào)數(shù), 如此進(jìn)行下去直到所有的人都出圈為止。

　　現(xiàn)要求按出圈次序, 每10人一組, 給出這n個(gè)人的順序表。請(qǐng)考生編制函數(shù)Josegh()實(shí)現(xiàn)此功能并調(diào)用函數(shù)WriteDat()把結(jié)果p輸出到文件JOSE.OUT中。

　　設(shè) n = 100, s = 1, m = 10。

　　(1) 將1到n個(gè)人的序號(hào)存入一維數(shù)組p中;

　　(2) 若第i個(gè)人報(bào)數(shù)后出圈, 則將p[i]置于數(shù)組的倒數(shù)第i個(gè)位置上, 而原來(lái)第i+1個(gè)至倒數(shù)第i個(gè)元素依次向前移動(dòng)一個(gè)位置;

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

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

　　請(qǐng)勿改動(dòng)主函數(shù)main()和輸出數(shù)據(jù)函數(shù)WriteDat()的內(nèi)容。

　　初始化：

　　#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) ;

　　}

　　本題評(píng)析：

　　參考答案及其注釋如下：

　　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　開(kāi)始　m　周期　n　總數(shù)