VB程序设计题

序问题 号 1 2 3 4 5 6 输出1~100中所有整数的平方和。 求1~210之间所有整数的立方和并输出结果。 求1~55的平方根的和。（保留小数点两位） 求S=1+1/2+1/3+……+1/100。 计算y=1+2/3+3/5+4/7+…+n/(2*n-1)的值, n=50, 要求：按四舍五入的方式精确到小数点后第二位。 (按四舍五入的方式精确到小数点后第四位)。 第 1/22 页

参 328350 490844025 275.43 5.187388 题型 基本 基本 基本 基本 26.47 基本 基本 当m的值为50时，计算下列公式之值: t=1+1/2^2+1/3^2+…+1/m^2 1.6251 湖南计算机等级考试VB程序设计题选

当m的值为50时，计算下列公式之值：7 t=1-1/(2*2)-1/(3*3)-…-1/(m*m) 要求：按四舍五入的方式精确到小数点后第四位。 8 9 要求：按四舍五入的方式精确到小数点后第四位。 求Y=1-1/2+1/3-1/4+1/5... 前30项之和。要求：按四舍五入的方式精确到小数点后第二位。 0.3749 基本 当n=50时，求下列级数和：S=1/（1*2）+1/（2*3）+…+1/(n*(n+1)) 0.9804 基本 0.68 基本 基本 10 入方式精确到小数点后4位） 求数学式1-1/2+1/3-1/4+1/5-1/6+…+1/99-1/100的值。 （按四舍五0.6882 3.140578 3628800 第 2/22 页

根据以下公式pi/2=1+1/3+1/3*2/5+1/3*2/5*3/7+1/3*2/5*3/7*4/9+…11 求pi(pi为圆周率)的值（保留6位小数）。当最后一项的值小于0.0005时停止计算。 12 求10的阶乘。 基本 基本 湖南计算机等级考试VB程序设计题选

13 要求：按四舍五入的方式精确到小数点后第四位。 14 计算s=2!+4!+6!+8!。 15 求1～200之间能被7整除的数的平方和。 当n的值为25时，计算下列公式的值: s=1+1/1!+1/2!+1/3!+…+1/n! 2.7183 377986 41 19 47 9 21 基本 41066 基本 基本 基本 基本 基本 基本 基本 16 计算1000以内，既能被6整除又能被8整除的数的个数。 17 求1到400间，同时能被3和7整除的数的个数。 18 求[351,432]之间既不能被3整除，又不能被8整除的数的个数。 19 数的个数。 求[10,1000]之间满足除以7余5、除以5余3、除以3余1的所有整20 求200到500间，能被13整除但不能被17整除的数的个数。 21 求3000以内能被17或23整除的正整数的个数。 22 按四舍五入的方式精确到小数点后第二位。 第 3/22 页

299 基本 1.48 基本 求500以内（含500）能被5或9整除的所有自然数的倒数之和。湖南计算机等级考试VB程序设计题选

23 求s=1+3+5+7+...直到s>3000为止。 24 500为止。 25 为止。 求1到5000之间的能被5整除的前若干个偶数之和，直到和大于求[1,5000]内能被5整除的前若干个偶数之和，直到和大于50000求出1到7000之间的能被5整除的前若干个偶数之和，当和值大求数列2,4,8,16,32,…前若干项之和。当和大于9000时，终止求和求在 1,2,3,...,100中, 任选两个不同的数,要求它们的和能被3和7算年龄。用爷爷的年龄的5倍加6得的和，再乘以20，再加上奶奶3025 基本 550 基本 50500 基本 550 基本 16382 基本 236 基本 26 于500时退出并输出和值。 27 并输出结果。 28 整除的数的对数(注意:3+5和5+3认为是同一对数)。 29 的年龄，再减去365，得数为6924，又知爷爷比奶奶大2岁。求爷140 基本 爷、奶奶的年龄的和。 第 4/22 页

湖南计算机等级考试VB程序设计题选

30 士都有一样的礼节，那么与会人士有多少？ 宴会上一共有1225次握手，设每一位参加宴会的人对其他与会人50 基本 基本 基本 31 时，求S的值。 要求：按四舍五入的方式精确到小数点后第四位。 8 32 S1,S2,S3,...,S100 中, 有多少个能被3和7整除？ 已知已知S1=1, S2=1+2, S3=1+2+3,..., SN=1+2+3+...+N, 求已知 S=1+1/(1+2)+1/(1+2+3)+…+1/(1+2+3+…+N) ，当N的值为501.96018 33 S1,S2,S3,...,S100 中,所有能被3和7整除的数之和. S1=1, S2=1+2, S3=1+2+3,...,SN=1+2+3+...+N, 求在31500 基本 34 1830 基本 时,An=n+1.例如:S6=0+3+2+5+4+7, 求：S60=A1+A2+A3+...+A60. sum=d+dd+ddd+……+ddd..d(d为1-9的数字)。例如：3+33+333+333335 （此时d=3,n=4）。从键盘上输入d 的值为8，n的值为9，求sum的值。 8197523 基本 已知Sn=A1+A2+A3+...+An, 其中,当n为奇数时An=n-1,当n为偶数36 求字符串\"87IM&2345kjwdssdcf\"中数，字母字符的ASCII码之和。 1 113 基本 第 5/22 页

湖南计算机等级考试VB程序设计题选

37 求字符串“This is my Basic”所有字符的ASCII码之和。 38 之积是880。 求一正整数等差数列的前六项的和，该数列前四项之和是26，四项求一正整数等差数列的前六项的平方和，该数列的前四项之和是我国今年的国民生产总值为45600亿元,若今后每年以9%的增长率猴吃桃：有一天小猴子摘下了若干个桃子，当即吃掉一半，还觉得不过瘾，又多吃了一个。第二天接着吃了剩下的桃子中的一半，仍1436 基本 57 699 9 等差数列 等差数列 递推 39 26、之积是880。 40 增长,计算多少年后能实现国民生产总值翻一番? 41 不过瘾，又多吃了一个。以后每天都是吃尚存桃子的一半零一个。1534 递推 到第10天早上小猴子再去吃桃子时，看到只剩下一个桃子了。问小猴子第一天共摘下了多少个桃子。 42 3070 递推 剩余的部分吃掉一半还多一个；以此类推，到第10天只剩余1个。第 6/22 页

猴子第1天摘下若干桃子，当即吃掉一半，又多吃一个，第二天将湖南计算机等级考试VB程序设计题选

问第1天共摘了多少桃子。 43 要求：按四舍五入的方式精确到小数点后第二位。 44 设x=9,n＝25； 计算Y=X/1!-X^3/3!+X^5/5!-X^7/7!+……前20项的值(已知：X=2)。0.91 递推 递推 递推 递推 递推 递推 求表达式e^x≈1＋x＋x^2/2!+x^3/3!+x^4/4!……+x^n/n!的近似值，8103.059 081 208 5 9831 求表达式e^x≈1＋x＋x^2/2!+x^3/3!+x^4/4!……+x^n/n!的近似值，8103.用cos(x)≈1－x^2/2!+x^4/4!-……+(-1)^(n)*(x^(2n))/(2n)!的公式求-0.911用cos(x)≈1－x^2/2!+x^4/4!-……+(-1)^(n)*(x^(2n))/(2n)!的公式求0.753用sin(x)≈x－x^3/3!+x^5/5!-……+(-1)^(n-1)*(x^(2n-1))/(2n-1)!的公0.655 直到最后一项小于0.01为止；设x＝9 46 近似值，设x＝9，n＝15 47 近似值，直到最后一项绝对值小于0.00001为止。设x＝7。 48 式求近似值。 设x=7,n＝15。 49 求S=1/2+2/3+3/5+5/8+……的前30项的和（注：该级数从第二项开18.46 递推 第 7/22 页

湖南计算机等级考试VB程序设计题选

始，其分子是前一项的分母，其分母是前一项的分子与分母的和）。要求：按四舍五入的方式精确到小数点后第二位。 求数列：2/1，3/2，5/3，8/5，13/8，21/13，…… 前50项之和(注：50 此数列从第二项开始，其分子是前一项的分子与分母之和，其分母83.24 递推 是前一项的分子)。（按四舍五入的方式精确到小数点后第二位） 51 求数列2/1，3/2，5/3，13/8，……的前10项之和。 16.47991 5 59 9251 递推 递推 递推 递推 52 求f(0)到f(50)的所有51个值中的最大值 。 53 求f(0)到f(50)中的最小值。 已知：f(0)=f(1)=1 f(2)=0 f(n)=f(n-1)-2*f(n-2)+f(n-3) ( n>2 ) 59832 已知：f(0)=f(1)=1 f(2)=0 f(n)=f(n-1)-2*f(n-2)+f(n-3) (n>2) -28 95043已知一个数列的前3个数为1，2，3，以后每个数为前3个数的和， 编程序求此数列的第35项。 55 金星和地球在某一时刻相对于太阳处于某一确定位置，已知金星绕125 公倍数 第 8/22 页

湖南计算机等级考试VB程序设计题选

太阳一周为225日，地球绕太阳一周为365日，问两个行星至少经过多少日仍同时回到原来的位置上？ 56 成为矩形。问参加演练的士兵最少有多少人？ 士兵在演练过程中，队伍变换成10、21、35、60行时，队形都能420 公倍数 129 公约数 18 公约数 57 求27090，21672，11352，8127的最大公约数。 58 的最大公约数。求需要经过多少次辗转。 从键盘输入两个数51211314和84131421，利用辗转相除法求它们已知数组S(x)中数组元素的值与Cos（x）一一对应，100=湖南计算机等级考试VB程序设计题选

8+17=25与其差 17-8=9都是平方数，则称8和17是自然数对（8，17）。假定（A，B）与（B，A）是同一个自然数对且假定A>=B，求所有小于或等于100（即：A<=100,B<=100，A<>B,A和B均不为0） 的自然数对中A-B之差的和。 自然数对是指两个自然数的和与差都是平方数，如8和17的和8+17=25与其差 17-8=9都是平方数，则称8和17是自然数对（8，62 17）。假定（A，B）与（B，A）是同一个自然数对且假定A>=B，79492 平方 求所有小于或等于100（即：A<=100,B<=100，A<>B,A和B均不为0）的自然数对中A*B的积的和。 \"水仙花数\"是指这样的数，其各位数字的立方和等于该数本身。编63 写程序，计算从100年开始到2000年为止，共有多少个年号是水仙花数年号。 的各位数字的立方和。求这种三位数的个数。 第 10/22 页

4 数字 有一个三位数满足下列条件: (1)三位数字各不相同; (2)此数等于它4 数字 湖南计算机等级考试VB程序设计题选

65 和。 66 和。 编程求在四位数的奇数中，所有各位数字之和是25的倍数的数之1298515 31 91 36 45 计算在[0，60]的范围内有多少个数，其每位数的乘积大于每位数的求[1，999]之间能被3整除，且至少有一位数字是5的所有正整数数字 数字 数字 数字 数字 67 的个数。 68 求能被7整除且至少有一位数字为9的三位数的个数。 69 位数字的数的个数。 求三位奇数中，个位数字与十位数字之和除以10所得的余数是百70 求三位数的偶数中，所有各位数字之和是15的倍数的数的和。 204 数字 71 求三位数的奇数中，所有各位数字之和是12的倍数的数的个数。 38 72 数字，且百位数字是偶数的数的和。 求三位数中，个位数字与十位数字之和除以10所得的余数是百位数字 21980 数字 73 求四位数的偶数中，所有各位数字之和是15的倍数的数的个数。 306 数字 第 11/22 页

湖南计算机等级考试VB程序设计题选

74 28884求在四位数的偶数中，所有各位数字之和是30的倍数的数的和。 0 求这样的一个三位数，其个位数不大于2。若将个位数移动到百位设某四位数的千位数字与十位数字的和等于百位数字与个位数字数字 75 之前（如：321移成132），新三位数大于原三位数的两倍。 102 数字 10782 76 的积，例如，对于四位数：9512，9+1=5*2，求所有这样的四位数之和。 77 （a≠0，e≠0，e≠1）的最小四位数abcd。 设有十进制数字a、b、c、d和e，求满足下列式子：abcd×e=dcba一个两位数的正整数，如果将其个位数与十位数字对调所生成的数称为其对调数，如28是82的对调数。现给定一个两位的正整数，78 请找到另一个两位的整数，使这两个数之和等于它们的各自的对调数之和。这样的另一个两位数有多少个。（从键盘输入的两位数为46） 第 12/22 页

数字 10 数字 8 数字 湖南计算机等级考试VB程序设计题选

79 出[1000，9999]之间的奇数回文数的个数。程序中有错误。 回文数是指正读和反读都一样的正整数。例如3773是回文数。求4位反序数：设N是一个四位数，它的9倍恰好是其反序数，求N。50 数字回文 数字对称 数字对称 数字对称 数字对称 数字对称 80 (反序数就是将整数的数字倒过来形成的整数，如1234的反序数是10 4321。) 81 整数且i2 5 82 间的一位整数。 一辆以固定速度行驶的汽车，司机看到里程表上从左到右的读数和湖南计算机等级考试VB程序设计题选

表上再次出现一个新的对称数。问车的速度是多少公里/小时？ 求符合下列条件的四位完全平方数(某个正整数A是另一个正整数85 7921 于百位数字与个位数字之积，例如，3136=562, 且3+3=1*6 故3136是所求的四位完全平方数. 求其中最大的一个数。 若一个四位正整数是另一个正整数的平方，且各位数字的和是一个86 1521 7396=86^2，且7+3+9+6=25=5^2，则称7396是“四位双平方数”。求最小的 “四位双平方数”。程序中有行一有错误。 若一个四位正整数是另一个正整数的平方，且各位数字的和是一个数字平87 7396=86^2，且7+3+9+6=25=5^2，则称7396是“四位双平方数”。29690 方 若把所有“四位双平方数”按升序排列，求前10个“四位双平方数”的和。 第 14/22 页

B的平方,则称A为完全平方数)，它的千位数字与十位数字之和等数字平方 平方数，则称该四位正整数是“四位双平方数”。例如： 由于数字平方 平方数，则称该四位正整数是“四位双平方数”。例如： 由于湖南计算机等级考试VB程序设计题选

88 二位数的平方，求四位平方数的个数。 四位平方数：千位、百位数相同，十位、个位数相同，且是某一个统计1000~9999之间的所有满足以下条件的四位数的个数。该数是1 数字平方 数字平方 一个完全平方数，且第1、2位数字之和为12，第3、4位数字之积为24。 90 求[3，500]内所有素数之和。 91 求数列f(n) = n*n+n+41的前100项中素数的个数 92 求[3-1000]之间最大的五个素数之和。 93 求[5000,6000]之间最小的素数 94 求[1000,20000]之间最大的素数 95 求[444,666]之间最大的素数是多少？ 96 求[2，400]中相差为10的相邻素数对的对数。 97 求出3到100之间的所有非偶数非素数的数的个数。 98 求区间[500，2500]中按递增顺序的第25个素数。 第 15/22 页

1 21534 素数 86 素数 4919 素数 5003 素数 19997 素数 661 素数 5 25 素数 素数 659 素数 湖南计算机等级考试VB程序设计题选

若两个连续的自然数的乘积减1后是素数，则称此两个连续自然数99 17291 素数 与9是友数对，71是友素数。求[100，200]之间的第10个友素数对所对应的友素数的值（按由小到大排列）。 若两个连续的自然数的乘积减1后是素数，则称此两个连续自然数100 为友数对，该素数称为友素数。例如，由于 8*9-1=71， 因此，838 与9是友数对，71是友素数。求[50，150]之间的友数对的数目。 101 在[1,10000]范围内考察个位数字是7的素数有多少个? 一个素数称之为超级素数，若该素数依次去掉个位，十位，...等等,308 素数 素数 为友数对，该素数称为友素数。例如，由于 8*9-1=71， 因此，8素数超102 每次所得的数仍然是素数。例如239就是超级素数。求[100,9999]85574 级 之内超级素数的和 除1和它本身外，不能被其它整数整除的正整数称为素数（注：1103 不是素数，2是素数）。若两素数之差为2 ，则称两素数为双胞胎22 数，问[31,601]之间有多少对双胞胎数。 第 16/22 页

素数双胞 湖南计算机等级考试VB程序设计题选

104 求数列前30个数中，有多少个质数。 105 106 求12345最大的质因子 已知菲波纳契数列{ X }中,X(1)=0,X(2)=1,X(n)=X(n-1)+X(n-2)，编程11 823 28 素数递推 素数因子 素数因子 素数数字 求整数2310的所有质因子（即所有为素数的因子）之和。 [300，800]范围内同时满足以下两个条件的十进制数. ⑴其个位数字107 与十位数字之和除以10所得的余数是百位数字 ；⑵该数是素数；761 求满足上述条件的最大的三位十进制数。 一个数出现在该数的平方数的右边，称这个数为“同构数”。例如，108 5出现在平方数25的右边，25出现在平方数625的右边，则5、25都是“同构数”。求[1，1000]之间的所有“同构数”的个数。 找出1-1000之间的全部同构数的个数。同构数是指一个数，它出现7 同构数 109 6 同构数 在它的平方数的右端。例如，5的平方是25，5是25中右端的数，第 17/22 页

湖南计算机等级考试VB程序设计题选

5就是一个同构数。同理，25也是一个同构数。 110 496 因子 6＝1＋2＋3，则6就是个完数,求200到500之间所有的完数之和。 111 等于其本身的正整数称为完数。例如：6=1+2+3，6是完数。 112 求[200,300]之间的有奇数个不同因子的最大整数。 113 时,包括1和该数本身)。 求[200,300]之间有奇数个不同因子的最小的整数(在计算因子个数若某整数N的所有因子之和等于N的倍数，则N称为多因子完备114 数,如数28,其因子之和1+2+4+7+14+28=56=2*28,28是多因子完备数。求[1,200]之间有多少个多因子完备数。 已知24有8个正整数因子(即:1,2,3,4,6,8,12,24)，而24正好被其因115 子个数8整除。求[100,300]之间能被其因子数目整除的数中最大的296 因子 数。 第 18/22 页

一个数如果刚好与它所有的因子之和相等，则称该数为“完数”, 如求[10，1000]之间的所有完数之和。各真因子之和（不包括自身）524 因子 2 因子 225 因子 4 因子 湖南计算机等级考试VB程序设计题选

百钱百鸡问题。用100钱买100只鸡，公鸡一只五钱，母鸡一只三116 钱，雏鸡三只一钱，编程计算共有几种买法(要求每种鸡至少要买1只)。 解百马百瓦古题。大、小马和马驹共100匹，共驮100片瓦。大马117 一驮三，小马一驮二，马驹二驮一，一次驮完，三种马都驮，共有多少种组合? 用一元纸币兑换一分、两分和五分的硬币，要求兑换硬币的总数为118 30枚，问共有多少种换法？(注：在兑换中，一分、两分或五分的硬币数可以为0枚) 119 种或两种都计算在内）的方法有多少种。 50元的整币兑换成5元、2元和1元币值（三种币值均有、缺少一146 组合 组合 组合 4 组合 6 组合 3 组合 120 将50元兑换成5元、2元和1元的方法(每种面额不能为0)的种数。 80 122 编程求方程5X+4Y=2，在|X|<=50,|Y|<=100内的整数解，X+Y最大86 第 19/22 页

121 106 组合 将50元兑换成5元、2元和1元的方法的种数（每种面额不能为0）。 湖南计算机等级考试VB程序设计题选

值是多少？ 123 求方程5X-4Y=2，在|X|<=100,|Y|<=50内的整数解中|X|+|Y|最大值？ 86 124 解中x+|y|的最大值是多少？ 求方程8x-5y=3,在|x|<=150, |y|<=200内的整数解。试问这样的整数编程求取：[121,140] 之间的弦数的个数（若某正整数的平方等于另125 两个正整数平方之和，则称该数为弦数. 例如:3^2+4^2=5^2, 因此5是弦数）。 求[1，50]之间的所有整数能构成直角三角形的三边的组数。例如：126 3*3+4*4=5*5，它们构成直角三角形，所以{3，4，5}作为一组，但20 {4，3，5}视为跟{3，4，5}相同的一组。 127 1 称为方程的一个解。试求方程的所有整数解中|x+y+z|的最小值。 求满足以下条件的（a，b，c）的组数： （1） 128 2 1/(a^2)+1/(b^2)=1/(c^2) ；（2）a>b>c ；（3）a+b+c<100。 第 20/22 页

组合 组合 2 8 组合 组合 若（x,y,z）满足方程：x^2+y^2+z^2=55^2(注：要求 x > y > z),则（x,y,z）组合 组合 湖南计算机等级考试VB程序设计题选

129 23 1犬7鸡5兔值钱958，2羊3犬5鸡1兔值钱861，求鸡值多少钱？ 130 29 1犬7鸡5兔值钱958，2羊3犬5鸡1兔值钱861，求兔值多少钱？ 131 设a+b+c+d＝100，且a+4＝b-4＝c*4＝d/4＝m，求m。 已知：非等腰三角形最长边是60，其它两边的长度都是正整数，且三边之和能被3整除，试编程求取这类三角形的个数（注意：两边132 的长度交换构成的三角形算作同一个三角形，如：其它两边的长度271 为30和40的三角形与长度为40和30的三角形视为同一个三角形）。 133 (注意:3+5和5+3认为是同一“数对”) 求1～100中, 两个不同的数之和能被3或7整除的“数对”的对数 2121 16 有5羊4犬3鸡2兔值钱1496，4羊2犬6鸡3兔值钱1175，3羊有5羊4犬3鸡2兔值钱1496，4羊2犬6鸡3兔值钱1175，3羊组合 组合 组合穷举 组合穷举 组合穷举 134 已知A，B为正整数, A湖南计算机等级考试VB程序设计题选

满足上述条件的B值。 135 最大值。 136 号乘积。 137 号乘积。 已知X,Y,Z为三个正整数，且X^2+Y^2+Z^2=25^2，求X+Y+Z的利用函数cos(n)产生一个25×10的矩阵，求出最大值所在的行、列利用函数sin(n)产生一个25×10的矩阵，求出最大值所在的行、列n个人围成一圈(编号为1-n)，从第1号的人开始从1报数，凡报到138 3的倍数的人离开圈子，然后再数下去，直到最后只剩一个人为止。11 问当n＝17时，剩下的人是多少号？ 求杨辉三角形中，第20行第10列的数为多少？ 杨辉三角形： 1 43 30 72 小 组合最大 数组最大值 数组最大值 数组猴选王 数组杨139 1 1 1 2 1 1 3 3 1 1 4 6 4 92378 三角 1 „„„„„„„„„„

第 22/22 页