二级计算机考试习题.docx
《二级计算机考试习题.docx》由会员分享，可在线阅读，更多相关《二级计算机考试习题.docx（14页珍藏版）》请在冰豆网上搜索。
二级计算机考试习题
[转]Visualfoxpro程序设计50题
1、求[10,1000]内所有能被被7和9中至少一个数整除的整数之个数。
答案：
236
n=0
fori=10to1000
ifmod（i,7）=0ormod（i,9）=0
n=n+1
endi
endf
?
n
2、求[101,299]内所有能被2整除但不能同时被3和5整除的整数之和。
答案：
18630
s=0
fori=101to299
ifmod（i,2）=0andnot（mod（i,3）=0andmod（i,5）=0）
s=s+i
endi
endf
?
s
3、求100以内最大的自然数n，使得从1开始的连续n个自然数的倒数之和小于3.5。
答案：
18
s=0
fori=1to100
s=s+1/i
ifs>=3.5
exit
endi
endf
?
i-1
4、求100以内最小的自然数n，使得从1开始的连续n个自然数的立方之和大于30000。
答案：
25
s=0
fori=1to100
s=s+i^3
ifs>30000
exit
endi
endf
?
i
5、求出100以内使得算式1*2+2*3+…+n*（n+1）的值小于5000的最大的自然数n。
答案：
23
s=0
fori=1to100
s=s+i*（i+1）
ifs>=5000
exit
endi
endf
?
i-1
6、求出100以内使得算式1/（1*1）+1/（2*2）+…+1/（n*n）的值小于1.6的最大的自然数n。
答案：
21
s=0
fori=1to100
s=s+1/i^2
ifs>=1.6
exit
endi
endf
?
i-1
7、某国今年的人口总数为1亿，若以每年4%的速度递增，试求出至少要再过几年该国人口总数才会翻一翻。
答案：
18
n=0
x=1
dowhilex<2
x=x*（1+0.04）
n=n+1
enddo
?
n
8、设等比数列：
1，3，9，27，…。
求使得此数列的前n项之和大于2345678的最小的自然数n。
答案：
14
s=0
n=0
dowhiles<=2345678
s=s+3^n
n=n+1
enddo
?
n
9、求出45678的所有非平凡因子（即除1和它本身以外的约数）中是奇数的因子个数。
答案：
7
n=0
s=45678
fori=3to22839step2
ifmod（s,i）=0
n=n+1
endif
endfor
?
n
10、求出203267的所有真因子（即小于它本身的约数）中最大的因子数。
答案：
6557
s=203267
fori=1toint（203267/3）
ifmod（s,i）=0
n=i
endif
endfor
?
n
11、求出20677和42067的最大公约数。
答案：
713
fori=20677to1step-1
ifmod（20677,i）=0andmod（42067,i）=0
exit
endif
endfor
?
i
12、求前[1,100]内能被6或8整除的所有自然数的平方根的和（将第1位小数四舍五入，结果只保留整数）。
答案：
162
s=0
fori=1to100
ifmod（i,6）=0ormod（i,8）=0
s=s+sqrt（i）
endif
endfor
?
round（s,0）
13、求所有符合算式ab*ba=2701的最小的两位数ab（即a*10+b）。
其中a、b是1~9之间的一位整数。
答案：
37
fora=1to9
forb=1to9
if（a*10+b）*（b*10+a）=2701
?
a*10+b
return
endif
endfor
endfor
14、已知数列：
1,2,4,7,11,16,…，其规律是相邻两项之差依次是1,2,3,4,5,…。
试求出此数列中大于5000的最小的项。
答案：
5051
a=1
n=1
dowhilea<5000
a=a+n
n=n+1
enddo
?
a
15、已知数列{f（n）}：
f
（1）=1，f
（2）=4，当n=3,4,5,…时，f（n）=3*f（n-1）-f（n-2）。
试求出100以内最小的自然数n使得此数列的第n项大于87654321。
答案：
20
Dimensionf（100）
f
（1）=1
f
（2）=4
n=2
dowhilef（n）<87654321
n=n+1
f（n）=3*f（n-1）-f（n-2）
enddo
?
n
16、一球从100米高处落至平地，并且连续多次再反弹再落下，假设每次反弹的高度都是前一高度的3/4倍，试求出最大的自然数n，使得此球从开始下落至第n次着地时在垂直方向所经过的总路程不超过690米。
答案：
15
h=100
s=100
n=1
dowhiles<690
h=h*3/4
s=s+2*h
n=n+1
enddo
?
n-1
17、设有用26个字母表示的26个表达式：
a=1，b=1/（a+1），c=1/（b+2），…，z=1/（y+25）。
试求出这26个字母中其值小于0.1的字母个数。
答案：
16
a=1
n=0
fori=1to25
a=1/（a+i）
ifa<0.1
n=n+1
endif
endfor
?
n
18、 回文指的是正读和反读都一样的一串字符，如121、1221。
试求出[1421,4112]内所有回文数的和。
答案：
74250
s=0
fori=1421to4112
ifint（i/1000）=i%10andint（i/100）%10=int（i%100/10）
s=s+i
endif
endfor
?
s
19、求在[100,999]内所有不含数字0且各位数字之积被96整除的数之和。
答案：
26640
s=0
fora=1to9
forb=1to9
forc=1to9
if（mod（a*b*c,96）=0）
s=s+a*100+b*10+c
endi
endf
endf
endf
?
s
20、将大于1000且能被4和6中至少一个数整除的所有整数按从小到大顺序排列后，求前面20个数之和。
答案：
20610
a=1001
n=0
s=0
dowhilen<20
ifmod（a,4）=0ormod（a,6）=0
s=s+a
n=n+1
endif
a=a+1
enddo
?
s
21、若一个自然数恰好是它的平方的末后几位数，则称此数为自同构数。
如5和76都是自同构数，因为它们的平方分别是25和5776。
求[2,99999]内所有自同构数之和。
（提示：
若x是m位同构数，则x的平方除以10的m次方的余数就是x）
答案：
101114
s=0
fori=2to999999
ifmod（i*i,10）=iormod（i*i,100）=iormod（i*i,1000）=iormod（i*i,10000）=iormod（i*i,100000）=i
s=s+i
endif
endfor
?
s
22、求满足条件A*B=54321且使A+B的值最小的自然数对A、B中较小的一个数。
（提示：
设A<=B，当A越大时A+B越小）
答案：
57
s1=54322
fori=1toint（sqrt（54321））
if（54321%i==0）
s=i+54321/i
if（s<=s1）
s1=s
a=i
endif
endif
endfor
?
a
23、已知数列：
1、2、4、7、10、15、…，其特点是：
相邻两项之差恰好构成自然数列：
1、2、3、4、5、…。
求此数列的前100项中能被4整除的项的个数。
答案：
25
m=0
a=1
forn=1to99
a=a+n
ifa%4==0
m=m+1
endif
endfor
?
m
24、求出将十进制整数98765432等值转换为二进制形式表示后其中数字1的个数。
（提示：
模拟人工计算的“2除取余”法）
答案：
13
c=98765432
n=0
dowhilec>0
if（c%2==1）
n=n+1
endif
c=int（c/2）
enddo
?
n
25、对自然数A、B、C，若A试求出弦为25000的勾股弦数组的个数。
答案：
5
n=0
forb=12500to25000
fora=1tob-1
ifa*a+b*b=25000*25000
n=n+1
endif
endfor
endfor
?
n
26、求方程3x-7y=1在条件|x|<100且|y|<40下的整数解的个数。
答案：
26
n=0
forx=-99to99
fory=-39to39
if3*x-7*y==1
n=n+1
endif
endfor
endfor
?
n
27、已知数列{f（n）}：
f
（1）=1，f
（2）=4，当n=3,4,5,…时，f（n）=3*f（n-1）-f（n-2）。
试求出100以内最大的自然数n使得此数列的前n项之和首次大于75364321。
答案：
19
dimef（100）
f
（1）=1
f
（2）=4
s=5
forn=3to100
f（n）=3*f（n-1）-f（n-2）
s=s+f（n）
ifs>75364321
exit
endif
endfor
?
n
28、求100－200内的所有素数的个数。
（素质是指只能被1和本身整除的数）
答案：
21
n=0
fori=100to200
forj=2toi-1
if（i%j==0）
exit
endif
endfor
ifj==i
n=n+1
endif
endfor
?
n
29、求1000－10000内的第50个素数。
（素质是指只能被1和本身整除的数）
答案：
1361
n=0
fori=1000to10000
forj=2toi-1
if（i%j==0）
exit
endif
endfor
ifj==i
n=n+1
endif
ifn==50
exit
endif
endfor
?
i
30、编写程序，计算10000以内有多少个这样的数，其个位数为6且该数能被9整除。
答案：
111
n=0
fori=1to10000
ifi%10==6andi%9==0
n=n+1
endif
endfor
?
n
31、设某四位数的各位数字的平方和等于100，问共有多少个这种四
升级会员 