《[其它考试]湖南省VF程序设计题库答案及过程》由会员分享，可在线阅读，更多相关《[其它考试]湖南省VF程序设计题库答案及过程（45页珍藏版）》请在金锄头文库上搜索。
1、 - 1 -湖南省一级程序设计题库过程及答案1 编程序求出1-200以内的能被7整除的数的平方和。 377986 cleas=0m=0for i=1 to 200if i%7=0m=i2s=s+mendifendfor?s2 编程序求199的平方根的和并输出结果。 （保留小数点两位） 661.46cleas=0for i=1 to 99s=s+sqrt(i)endfor?round(s,2)3 编程序求155的平方根的和并输出结果。 （保留小数点两位） 275.43cleas=0for i=1 to 55s=s+sqrt(i)endfor?round(s,2)4 编程序统计11000能被3整除
2、的数的个数。 333cleas=0for n=1 to 1000if n%3=0s=s+1endifendfor?s 5 编程序求出1100所有整数的平方和并输出结果。 338350 cleas=0for n=1 to 100s=s+n2endfor?s 6 编程序求出1200所有整数的平方和并输出结果。 2686700cleas=0for n=1 to 200s=s+n2endfor?s 7 编程序求出1到5000之间的能被5整除的前若干个偶数之和，当和大于500 时程序退出。 550 cleas=0for n=10 to 5000 step 10s=s+nif s500exitendife
3、ndfor?s8 编程序求在3000以内被17或者23整除的正整数数的个数。 299 cleas=0for n=1 to 3000if n%17=0 or n%23=0s=s+1endifendfor?s9 序求在1000以内被17或者23整除的正整数数的个数。 99 cleas=0for n=1 to 1000if n%17=0 or n%23=0 - 2 -s=s+1endifendfor?s10 编程序求在5000以内被17或者23整除的正整数数的个数。 499cleas=0for n=1 to 5000if n%17=0 or n%23=0s=s+1endifendfor?s 11 编
4、程序求出1-100以内的能被3整除的数的平方和。 112761 cleas=0for n=1 to 100if n%3=0s=s+n2endifendfor?s12 已知一个数列的前3个数为0，0，1，以后每个数为前3个数的和，编程序求此数列的第36个数。 334745777 cleadime f(36)f(1)=0f(2)=0f(3)=1s=0for n=4 to 36f(n)=f(n-3)+f(n-2)+f(n-1)s=f(n)endfor?s13 编程序求出1-100以内的能被9整除的数的平方和。 40986cleas=0for n=1 to 100if n%9=0s=s+n2endif
5、endfor?s 14 编程序求出1-200以内的能被3整除的数的平方和。 882189 cleas=0for n=1 to 200if n%3=0s=s+n2endifendfor?s15 编程序求出1-7000以内能被3或者7整除数的个数。 3000cleas=0for n=1 to 7000if n%3=0 or n%7=0s=s+1endifendfor?s 16 序求出1-3000以内能被3或者5整除数的个数。 1400cleas=0for n=1 to 3000if n%3=0 or n%5=0s=s+1endifendfor?s 17 编程序求出1-5000以内能被3或者7整除数
6、的个数。 2142cleas=0for n=1 to 5000if n%3=0 or n%7=0s=s+1endifendfor - 3 -?s 18 编程序求出1-6000以内能被3或者5整除数的个数。 2800cleas=0for n=1 to 6000if n%3=0 or n%5=0s=s+1endifendfor?s 19 编程序求出1-4000以内能被3或者11整除数的个数。 1575cleas=0for n=1 to 4000if n%3=0 or n%11=0s=s+1endifendfor?s 20 编程序求出1-5000以内能被37整除的整数之和。 339660 cleas
7、=0for n=1 to 5000if n%37=0s=s+nendifEndfor?s21 编程序求出1-6000以内能被23整除的整数之和。 780390cleas=0for n=1 to 6000if n%23=0s=s+nendifendfor?s 22 编程序求出1-3000以内能被33整除的整数之和。 135135 cleas=0for n=1 to 3000if n%33=0s=s+nendifendfor?s 23 编程序求出1-5000以内能被15整除的整数之和。 834165cleas=0for n=1 to 5000if n%15=0s=s+nendifendfor?s
8、24 编程序求出100到200之间同时满足除3余2和除5余3条件的数的个数。 6cleas=0for n=100 to 200if n%3=2 and n%5=3s=s+1endifendfor?s25 编程序求出1到300之间同时满足除3余2和除5余3条件的数的个数。 20cleas=0for n=1 to 300if n%3=2 and n%5=3s=s+1endifendfor?s26 编程序求出100到500之间同时满足除3余2和除5余3条件的数的个数。 26cleas=0for n=100 to 500if n%3=2 and n%5=3s=s+1 - 4 -endifendfor?
9、s27 编程序求出1到400之间同时满足除3余2和除5余3条件的数的个数。 27cleas=0for n=1to 400if n%3=2 and n%5=3s=s+1endifendfor?s28 编程序求出100到600之间同时满足除3余2和除5余3条件的数的个数。 33cleas=0for n=100 to 600if n%3=2 and n%5=3s=s+1endifendfor?s29 编程序求出1到500之间同时满足除3余2和除5余3条件的数的个数。 33cleas=0for n=1to 500if n%3=2 and n%5=3s=s+1endifendfor?s30 1 编程序求
10、出 2+4+8+16+32+这样的数之和。如果累加数大于500时，则程序终止并输出结果。 510 cleas=0for n=1 to 100s=s+2nif s500exitendifendfor?s31 编程序求出1100 所有整数的立方和并输出结果。 25502500cleas=0for n=1 to 100s=s+n3endfor?s32 编程序求出1110 所有整数的立方和并输出结果。 37271025cleas=0for n=1 to 110s=s+n3endfor?s 33 编程序求出166所有整数的立方和并输出结果。 4888521cleas=0for n=1 to 66s=s+
11、n3endfor?s34 编程序求出1150 所有整数的立方和并输出结果。 128255625cleas=0for n=1 to 150s=s+n3endfor?s35 编程序求出1180 所有整数的立方和并输出结果。 265364100cleas=0for n=1 to 180s=s+n3endfor?s 36 编程序求出1200 所有整数的立 - 5 -方和并输出结果。 404010000cleas=0for n=1 to 200s=s+n3endfor?s37 编程序求出1210 所有整数的立方和并输出结果。 490844025cleas=0for n=1 to 210s=s+n3end
12、for?s 38 编程序求出 S=1130所有整数的立方和并输出结果。 72505225cleas=0for n=1 to 130s=s+n3endfor?s39 编写程序，计算1000以内有多少个这样的数，该数既能被6整除又能被8整除。 41 cleas=0for n=1 to 1000if n%6=0 and n%8=0s=s+1endifendfor?s40 编程序求1110 所有整数的平方和并输出结果。 449735 cleas=0for n=1 to 110s=s+n2endfor?s41 编程序求1120 所有整数的平方和并输出结果。 583220 cleas=0for n=1 t
13、o 120s=s+n2endfor?s42 编程序求180所有整数的平方和并输出结果。 173880 cleas=0for n=1 to 80s=s+n2endfor?s43 编程序求1150 所有整数的平方和并输出结果。 1136275cleas=0for n=1 to 150s=s+n2endfor?s44 编程序求160所有整数的平方和并输出结果。 73810 cleas=0for n=1 to 60s=s+n2endfor?s45 编程序求190所有整数的平方和并输出结果。 247065cleas=0for n=1 to 90s=s+n2endfor?s46 编程序求1108 所有整数
14、的平方和并输出结果。 425754cleas=0for n=1 to 108s=s+n2 - 6 -endfor?s47 编程序求1145 所有整数的平方和并输出结果。 1026745cleas=0for n=1 to 145s=s+n2endfor?s48 编程序求1250 所有整数的平方和并输出结果。 5239625cleas=0for n=1 to 250s=s+n2endfor?s 49 编程序求1300 所有整数的平方和并输出结果。 9045050cleas=0for n=1 to 300s=s+n2endfor?s50 编程序求出1到5000之间的能被7整除的前若干个数之和，当和大于1500时退出 并输出结果。 1617cleas=0for n=1 to 5000if n%7=0s=s+nendifif s1500exitendifendfor?s51 编程序求出1到3000之间的能被3整除的前若干个数之和，当和大于
