VF程序设计题库.doc

《VF程序设计题库.doc》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、一级程序设计题库过程及答案1编程序求出1-200以内的能被7整除的数的平方和。cleas=0m=0fori=1to200ifi%7=0m=i^2s=s+mendifendfor?s2编程序求1~99的平方根的和并输出结果。（保留小数点两位）661.46cleas=0fori=1to99s=s+sqrt(i)endfor?round(s,2)3编程序求1~55的平方根的和并输出结果。（保留小数点两位）275.43cleas=0fori=1to55s=s+sqrt(i)endfor?round(s,2)4编程序统计1~1000能被3整除的数的个数。333cleas=0forn=1to1000ifn

2、%3=0s=s+1endifendfor?s7编程序求出1到5000之间的能被5整除的前若干个偶数之和，当和大于500时程序退出。550cleas=0forn=10to5000step10s=s+nifs>500exitendifendfor?s8编程序求在3000以内被17或者23整除的正整数数的个数。299cleas=0forn=1to3000ifn%17=0orn%23=0s=s+1endifendfor?s9序求在1000以内被17或者23整除的正整数数的个数。99cleas=0forn=1to1000ifn%17=0orn%23=0s=s+1endifendfor?s10编程序求在5

3、000以内被17或者23整除的正整数数的个数。499cleas=0forn=1to5000ifn%17=0orn%23=0s=s+1endifendfor?s11编程序求出1-100以内的能被3整除的数的平方和。cleas=0forn=1to100ifn%3=0s=s+n^2endifendfor?s12已知一个数列的前3个数为0，0，1，以后每个数为前3个数的和，编程序求此数列的第36个数。cleadimef(36)f(1)=0f(2)=0f(3)=1s=0forn=4to36f(n)=f(n-3)+f(n-2)+f(n-1)s=f(n)endfor?s13编程序求出1-100以内的能被9整

4、除的数的平方和。40986cleas=0forn=1to100ifn%9=0s=s+n^2endifendfor?s14编程序求出1-200以内的能被3整除的数的平方和。cleas=0forn=1to200ifn%3=0s=s+n^2endifendfor?s15编程序求出1-7000以内能被3或者7整除数的个数。3000cleas=0forn=1to7000ifn%3=0orn%7=0s=s+1endifendfor?s16序求出1-3000以内能被3或者5整除数的个数。1400cleas=0forn=1to3000ifn%3=0orn%5=0s=s+1endifendfor?s17编程序求

5、出1-5000以内能被3或者7整除数的个数。2142cleas=0forn=1to5000ifn%3=0orn%7=0s=s+1endifendfor?s18编程序求出1-6000以内能被3或者5整除数的个数。2800cleas=0forn=1to6000ifn%3=0orn%5=0s=s+1endifendfor?s19编程序求出1-4000以内能被3或者11整除数的个数。1575cleas=0forn=1to4000ifn%3=0orn%11=0s=s+1endifendfor?s20编程序求出1-5000以内能被37整除的整数之和。cleas=0forn=1to5000ifn%37=0s

6、=s+nendifEndfor?s21编程序求出1-6000以内能被23整除的整数之和。cleas=0forn=1to6000ifn%23=0s=s+nendifendfor?s22编程序求出1-3000以内能被33整除的整数之和。cleas=0forn=1to3000ifn%33=0s=s+nendifendfor?s23编程序求出1-5000以内能被15整除的整数之和。cleas=0forn=1to5000ifn%15=0s=s+nendifendfor?s24编程序求出100到200之间同时满足除3余2和除5余3条件的数的个数。6cleas=0forn=100to200ifn%3=2an

7、dn%5=3s=s+1endifendfor?s25编程序求出1到300之间同时满足除3余2和除5余3条件的数的个数。20cleas=0forn=1to300ifn%3=2andn%5=3s=s+1endifendfor?s26编程序求出100到500之间同时满足除3余2和除5余3条件的数的个数。26cleas=0forn=100to500ifn%3=2andn%5=3s=s+1endifendf