资源描述：
《省考复习vf程序设计一》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。
1、VF程序设计复习题第一部分程序设计1、编写程序，求四位数的偶数中，所有各位数字之和是15的倍数的数的和。(1592376)SettalkofS=0Fori=1000to9998Step2A=int(i/1000)B=int((i-a*1000)/100)C=int((i-a*1000-b*100)/10)D=mod(i,1000)Ifmod((a+b+c+d),15)=0S=s+iEndifEndfor?SSettalkonReturn1-1、编写程序，求三位数的偶数中，所有各位数字之和是15的倍数的数的和。(20454)1-2.编写程序，求三
2、位数的奇数中，所有各位数字Z和是15的倍数的数的和。(19731)1-3、编写程序，求三位数的奇数小，所有各位数字之和是12的倍数的数的个数。(38)1-4编写程序，求四位数的奇数中，所有各位数字之积(且不为0)是60的倍数的数的和。(3456254)1-5编写程序，求满足下列条件的所有四位数ABCD的个数，该四位数是8的倍数，且A+B二B+C,即第1位数加上第2位数等于第2位数加上第3位数。(110)2、编写程序，求1到5000之间的能被5整除的前若干个偶数之和，当和值大于500吋退出,输出该和值。(550)SettalkoffS=()i=2
3、Dowhiles<=500Ifmod(i,5)=0S=s+iEndifEnddo?SSettalkonReturn2-1编写程序，已知：S=2+4+8+16+32+…,求S不大于2500的最大值。(2046)SettalkoffS=0i=2Dowhiles<=2500S=s+ii二i*2Enddo?s-iSettalkonReturn3、编写程序，计算在0〜50的范围内有多少个数，其每位数的乘积大于每位数的和。(23)SettalkoffN=0Forx=llto50A=int(x/10)B=mod(x,10)Ifa*b>a+bN=n+1Endi
4、fEndofr?NSettalkoffRetum1-1、编写程序，求在3000以内能被17或者23整除的正整数的个数。(299)SettalkoffN=0Forx=lto3000Ifmod(x,17)=0ORmod(x,23)=0N=n+1EndifEndfor?nSettalkonReturn3-2编写程序，求在1000以内能被17或者23整除的正整数的个数。(99)3-3编写程序，求在1000以内能被17或者23整除的正整数的和。3-4编写程序，求在1000以内既能被17,又能被23整除的正整数的和。3-5编写程序，求出100至I」500之
5、间同时满足除5余4和除7余2条件的数的个数。(12)3-6编写程序，求出100至I」500之I'可同吋满足除5余4和除7余2条件的数的和。(3678)3-7编写程序，计算1000以内有多少个这样的数，其个位数为6且该数能被9整除。(11)SettalkoffN=0Forx=1to1000D=mod(x,10)Ifd=6andmod(x,9)=0N=n+1EndifEndfor?NSettalkoffReturn“完数”问题4、一个数如果刚好与它所有的因子之和相等，则称该数为一个“完数”，如：6=1+2+3,则6就是一个完数。求出200到500之
6、间所有的完数之和。(496)SettalkoffS=0&&所有完数之和Forx=200to500M=0&&x的因子之和Forq=ltoX-lIfmod(x,q)=0M=m+q&&求因子之和EndifIfx=mS=s+x&&求完数之和的EndifEndforEndfor?sSettalkonReturn1-1一个数如果刚好与它所有的因子之和相等，则称该数为一个“完数“，如：6=1+2+3,则6就是一个完数。求出1000以内的完数的个数。(3)一个数如果刚好与小于它的所有因子之和相等，则称该数为一个“完数”，求出600以内的所有完数的平方和。(24
7、6836)SettalkoffS=0&&所有完数的平方和Forx=200to500M=0&&x的因子之和Forq=ltoX-lIfmod(x,q)=0M=m+q&&求因子之和EndifIfx=mS=s+xA2&&求完数的平方和EndifEndforEndfor?sSettalkonReturn“斐波拉契”数列问题5、已知一个数列的前3个数为0,0,1,以后每个数为前3个数的和，编程序求此数列的第36个数。(334745777)SettalkoffN=0Fl=0F2=0F3=lForx=lto33F二fl+f2+f3Fl=f2F2=f3F3=fE
8、ndfor?FSettalkonReturn1-1已知一个数列的前3个数为0,1,2,以后每个数为前3个数的和，编写程序求此数列的第30项。(2454
