[其它考试]湖南省VF程序设计题库答案及过程.doc

湖南省一级程序设计题库过程及答案1 编程序求出1-200以内的能被7整除的数的平方和。 377986 clea s=0 m=0 for i=1 to 200 if i%7=0 m=i^2 s=s+m endif endfor ?s 2 编程序求1~99的平方根的和并输出结果。（保留小数点两位） 661.46 clea s=0 for i=1 to 99 s=s+sqrt(i) endfor ?round(s,2) 3 编程序求1~55的平方根的和并输出结果。（保留小数点两位） 275.43 clea s=0 for i=1 to 55 s=s+sqrt(i) endfor ?round(s,2) 4 编程序统计1~1000能被3整除的数的个数。 333 clea s=0 for n=1 to 1000 if n%3=0 s=s+1 endif endfor ?s 5 编程序求出1~100所有整数的平方和并输出结果。 338350 clea s=0 for n=1 to 100 s=s+n^2 endfor ?s 6 编程序求出1~200所有整数的平方和并输出结果。 2686700 clea s=0 for n=1 to 200 s=s+n^2 endfor ?s 7 编程序求出1到5000之间的能被5整除的前若干个偶数之和，当和大于500 时程序退出。 550 clea s=0 for n=10 to 5000 step 10 s=s+n if s500 exit endif endfor ?s 8 编程序求在3000以内被17或者23整除的正整数数的个数。 299 clea s=0 for n=1 to 3000 if n%17=0 or n%23=0 s=s+1 endif endfor ?s 9 序求在1000以内被17或者23整除的正整数数的个数。 99 clea s=0 for n=1 to 1000 if n%17=0 or n%23=0 s=s+1 endif endfor ?s 10 编程序求在5000以内被17或者23整除的正整数数的个数。 499 clea s=0 for n=1 to 5000 if n%17=0 or n%23=0 s=s+1 endif endfor ?s 11 编程序求出1-100以内的能被3整除的数的平方和。 112761 clea s=0 for n=1 to 100 if n%3=0 s=s+n^2 endif endfor ?s 12 已知一个数列的前3个数为0，0，1，以后每个数为前3个数的和，编程序求此数列的第36个数。 334745777 clea dime f(36) f(1)=0 f(2)=0 f(3)=1 s=0 for n=4 to 36 f(n)=f(n-3)+f(n-2)+f(n-1) s=f(n) endfor ?s 13 编程序求出1-100以内的能被9整除的数的平方和。 40986 clea s=0 for n=1 to 100 if n%9=0 s=s+n^2 endif endfor ?s 14 编程序求出1-200以内的能被3整除的数的平方和。 882189 clea s=0 for n=1 to 200 if n%3=0 s=s+n^2 endif endfor ?s 15 编程序求出1-7000以内能被3或者7整除数的个数。 3000 clea s=0 for n=1 to 7000 if n%3=0 or n%7=0 s=s+1 endif endfor ?s 16 序求出1-3000以内能被3或者5整除数的个数。 1400 clea s=0 for n=1 to 3000 if n%3=0 or n%5=0 s=s+1 endif endfor ?s 17 编程序求出1-5000以内能被3或者7整除数的个数。 2142 clea s=0 for n=1 to 5000 if n%3=0 or n%7=0 s=s+1 endif endfor ?s 18 编程序求出1-6000以内能被3或者5整除数的个数。 2800 clea s=0 for n=1 to 6000 if n%3=0 or n%5=0 s=s+1