int jsvalue(int bb[])
{

}

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<num;i++)printf(out,\"%d\\n\",b[i]);
fclose(out);
}

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

注：注意在i==(int)sqrt(i)*(int)sqrt(i)中只有當i是完全平方數(shù)時開平方后再取整才不會丟失任何數(shù)據(jù)。
int jsvalue(int bb[])
{
int i,j,k=0,g,s,b;
for(i=100;i<=999;i++)
{
g=i%10;
s=i/10%10;
b=i/100;
if((i==(int)sqrt(i)*(int)sqrt(i))&&(g==s//s==b//b==g))
bb[k++]=i;
}
return k;
}

int jsvalue(int bb[])
{
int i,k=0;
for(i=100;i<=999;i++)
if((int)sqrt(i)*(int)sqrt(i)==i && (i/100==i%10 || i/100==i/10%10 || i/10%10==i%10))
bb[k++]=i;
return k;

}

6
設(shè)有n個人圍坐一圈并按順時針方向從1到n編號, 從第s個人開始進行1到m的報數(shù), 報數(shù)到第m個人, 此人出圈, 再從他的下一個人重新開始1到m的報數(shù), 如此進行下去直到所有的人都出圈為止。
現(xiàn)要求按出圈次序, 每10人一組, 給出這n個人的順序表。請考生編制函數(shù)Josegh()實現(xiàn)此功能并調(diào)用函數(shù)WriteDat()把結(jié)果p輸出到文件JOSE.OUT中。
設(shè) n = 100, s = 1, m = 10。
(1) 將1到n個人的序號存入一維數(shù)組p中;
(2) 若第i個人報數(shù)后出圈, 則將p[i]置于數(shù)組的倒數(shù)第i個位置上, 而原來第i+1個至倒數(shù)第i個元素依次向前移動一個位置;
(3) 重復(fù)第(2)步直至圈中只剩下p[1]為止。
注意: 部分源程序存放在PROG1.C中。
請勿改動主函數(shù)main()和輸出數(shù)據(jù)函數(shù)WriteDat()的內(nèi)容。

初始化：
#include <stdio.h>
#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("%4d ", p[i]) ;
fprintf(fp, "%4d", 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　總數(shù)

更多資料請訪問：考試吧計算機等級考試欄目