资源描述：
《visual foxpro程序设计练习题及答案》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、Visualfoxpro程序设计练习题1、求[10,1000]内所有能被被7和9中至少一个数整除的整数之个数。答案：236n=0fori=10to1000ifmod(i,7)=0ormod(i,9)=0n=n+1endiendf?n2、求[101,299]内所有能被2整除但不能同时被3和5整除的整数之和。答案：18630s=0fori=101to299ifmod(i,2)=0andmod(i,3)<>0ormod(i,5)<>0s=s+iendiendf?s3、求100以内最大的自然数n，使得从1开始的连续n个自然数的倒数之和小于3.5。答案：18s=0fori=1to100s=s+1/ii
2、fs>=3.5exitendiendf?i-14、求100以内最小的自然数n，使得从1开始的连续n个自然数的立方之和大于30000。答案：25s=0fori=1to100s=s+i^3ifs>30000exitendiendf?i5、求出100以内使得算式1*2+2*3+…+n*(n+1)的值小于5000的最大的自然数n。答案：23s=0fori=1to100s=s+i*(i+1)ifs>=5000exitendiendf?i-16、求出100以内使得算式1/(1*1)+1/(2*2)+…+1/(n*n)的值小于1.6的最大的自然数n。答案：21s=0fori=1to100s=s+1/i^2
3、ifs>=1.6exitendiendf?i-17、某国今年的人口总数为1亿，若以每年4%的速度递增，试求出至少要再过几年该国人口总数才会翻一翻。答案：18n=0x=1dowhilex<2x=x*(1+0.04)n=n+1enddo?n8、设等比数列：1，3，9，27，…。求使得此数列的前n项之和大于2345678的最小的自然数n。答案：14s=0n=0dowhiles<=2345678s=s+3^nn=n+1enddo?n9、求出45678的所有非平凡因子（即除1和它本身以外的约数）中是奇数的因子个数。答案：7n=0s=45678fori=3to22839step2ifmod(s,i)=0
4、n=n+1endifendfor?n10、求出203267的所有真因子（即小于它本身的约数）中最大的因子数。答案：6557s=203267fori=1toint(203267/3)ifmod(s,i)=0n=iendifendfor?n11、求出20677和42067的最大公约数。答案：713fori=20677to1step-1ifmod(20677,i)=0andmod(42067,i)=0exitendifendfor?i12、求前[1,100]内能被6或8整除的所有自然数的平方根的和（将第1位小数四舍五入，结果只保留整数）。答案：162s=0fori=1to100ifmod(i,6)
5、=0ormod(i,8)=0s=s+sqrt(i)endifendfor?round(s,0)13、求所有符合算式ab*ba=2701的最小的两位数ab（即a*10+b）。其中a、b是1~9之间的一位整数。答案：37fora=1to9forb=1to9if(a*10+b)*(b*10+a)=2701?a*10+breturnendifendforendfor14、已知数列：1,2,4,7,11,16,…，其规律是相邻两项之差依次是1,2,3,4,5,…。试求出此数列中大于5000的最小的项。答案：5051a=1n=1dowhilea<5000a=a+nn=n+1enddo?a15、已知数列{
6、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。答案：20Dimensionf(100)f(1)=1f(2)=4n=2dowhilef(n)<87654321n=n+1f(n)=3*f(n-1)-f(n-2)enddo?n16、一球从100米高处落至平地，并且连续多次再反弹再落下，假设每次反弹的高度都是前一高度的3/4倍，试求出最大的自然数n，使得此球从开始下落至第n次着地时在垂直方向所经过的总路程不超过690米。答案：15h=100s=100n=1dowhiles
7、<690h=h*3/4s=s+2*hn=n+1enddo?n-117、设有用26个字母表示的26个表达式：a=1，b=1/(a+1)，c=1/(b+2)，…，z=1/(y+25)。试求出这26个字母中其值小于0.1的字母个数。答案：16a=1n=0fori=1to25a=1/(a+i)ifa<0.1n=n+1endifendfor?n18、回文指的是正读和反读都一样的一串字符，如121、1221。试求出[14
