vb编程

1. 程序功能：求s=1+3+5+7+…直到s>2000为止。程序中有两行有错误。改正错误，使它能输入正确的结果。（2025）

2. 程序功能：计算s=2!+4!+8!. 程序中有两行有错误。改正错误，使它能输入正确的结果。（40346）

3. 程序功能：计算s=2!+4!+6!+8!。程序中有错误。改正错误，使它能输入正确的结果。（41066）

4. 程序功能：求200到400间；能被3整除但不能被7整除的个数。程序中有两行有错误。改正错误，使它能输入正确的结果。（57）

5. 程序功能：求1到400间，同时能被3和7整除的个数。程序中有两行有错误。改正错误，使它能输入正确的结果。（19）

6. 程序功能：求能被3整除且至少有一位数字为5的三位数的个数。程序中有两行有错误。改正错误，使它能输入正确的结果。（85）

7. 程序功能：求三位偶数中，个位数与十位数之和除以10所得的余数是百位数字的数的个数。程序中有两行有错误。改正错误，使它能输入正确的结果。（45）

8. 程序功能：求平方和小雨2000的最大自然数。程序中有两行有错误。改正错误，使它能输入正确的结果。（18）

9. 程序功能：解白马白瓦古题。大·小马和马驹工100匹，共驮100片瓦，大马一驮三，小马一驮二，马驹二驮一，一次驮完，三种马都驮，共有多少种组合？程序中有三行有错误。改正错误，使它能输入正确的结果。（6）

10. 程序功能：求100~200之间的所有素数个数，程序中有两行有错误。改正错误，使它能输入正确的结果。（21）

11. 程序功能：sum=d+dd+ddd+……+ddd..d(d为1-9的数字)。例如：3+33+333+3333（此时d=3,n=4）。从键盘上输入d的值为8，n的值为9，求sum的值。程序中有两行有错误。改正错误，使它能输入正确的结果。（987654312）

12. 程序功能：输入水仙花的个数（所谓水仙花数„十指一个三位十进制，该数的个位数字立方之和等于该数本身，例如153是一个水仙花数，因为1ˇ3+5ˇ3+3ˇ3=135）程序中有两行有错误。改正错误，使它能输入正确的结果。（4）

13. 程序功能：求数列2|1，3|2，5|3，8|5，13|8，„„的前10项之和。程序中有两行有错误。改正错误，使它能输入正确的结果。（16.47991）

14. 程序功能：猴子第1天摘下若干桃子，当即吃掉一半，又多吃了一个，第二天将剩余的部分吃掉一半还多一个；以此类推，到第10天只剩下1个。问第1天共摘了多少桃子。程序中有两行有错误。改正错误，使它能输入正确的结果。（1534）

15. 程序功能：求1~200之间的能被7整除的数的平方和。程序中有两行有错误。改正错误，使它能输入正确的结果。（377986）

16. 程序功能：求1~99的平方根的和并输出结果（保留小数点两位），程序中有两行有错误。改正错误，使它能输入正确的结果。（661.46）

17. 程序功能：求【1，5000】内能被5整除的前若干个偶数之和，直到和大于50000为止。程序中有两行有错误。改正错误，使它能输入正确的结果。（50500）

18. 程序功能：求3000以内能被17或23整除的正整数的个数。程序中有两行有错误。改正错误，使它能输入正确的结果。（299）

19. 程序功能：已知一个数列的前3项为0，0，1，以后每项为前三项的和，求此数列的第36项。程序中有两行有错误。改正错误，使它能输入正确的结果。（334745777）

20. 程序功能：求数列2，4，8，16，32，„前若干项之和。当和大于9000时，终止求和并输出结果。程序中有两行有错误。改正错误，使它能输入正确的结果。（16382）

21. 程序功能：已知24有8个整数数因子（即：1，2，3，4，6，8，12，24），而24正好被其因子个数8整除。问[100,300]之间有多少个这样的数。程序中有两行有错误。改正错误，使它能输入正确的结果。（19）

22. 程序功能：我国今年的国民生产总值为45600亿元，若今后每年以9%的增长，计算多少年以后能实现国民生产总值翻一番？程序中有两行有错误。改正错误，使它能输入正确的结果。（9）

23. 程序功能：已知24有8个整数数因子（即：1，2，3，4，8，12，24），而24正好被其因子个数5整除。求【100，300】之间能被其因子数目整除的数中的最大的数。程序中有两行有错误。改正错误，使它能输入正确的结果。（296）

24. 程序功能：有一个三位数满足下列条件：(1)三位数字各不相同；（2）此数等于它的各位数字的立方和，求这种三位数的个数。程序中有两行有错误。改正错误，使它能输入正确的结果。（4）

25. 程序功能：求（3，500）内所有素数之和。程序中有一行有错误。改正错误，使它能输入正确的结果。（21534）

26. 程序功能：求（3-1000）之间最大的五个素数之和。程序中有两行有错误。改正错误，使它能输入正确的结果。（4919）

27. 程序功能：把一张一元钞票，换成一分、两分和五分硬币，每种至少7枚，求方案数。程序中有两行有错误。改正错误，使它能输入正确的结果。（80）

28. 程序功能：求区间（500,2500）中按递增顺序的第25个素数。程序中有两行有错误。改正错误，使它能输入正确的结果。（659）

29. 程序功能：设某四位数的千位数字与十位数字的和等于百位数与千位数字的积，例如，对于四位数：9512，9+1=5*2，求所有这样的四位数之和。程序中有一行有错误。改正错误，使它能输入正确的结果。（1078289）

30. 程序功能：求（200，300）之间的有奇数个不同因子的最大整数。程序中有两行有错误。改正错误，使它能输入正确的结果。（289）

31. 程序功能：计算y=1+2|3+3|5+4|7+„+n|(2*n-1)(n=50),要求：按四舍五入的方法精确到小数点后第二位。程序中有两行有错误。改正错误，使它能输入正确的结果。（26.47）

32. 程序功能：求当N=20时，1|（1*2）+1|(2*3)+1|(3*4)+„+1|(N*N+1)的值。要求按四舍五入的方法精确到小数点后第二位。程序中有一行有错误。改正错误，使它能输入正确的结果。（0.95）

33. 程序功能：当m+50时，表达式t=1-1|（2*2）-1|（3*3）-„-1|（m*m）的值。要求：按四舍五入的方式精确到小数点后第四位。程序中有两行有错误。改正错误，使它能输入正确的结果。（0.3749）

34. 程序功能：求（10，1000）之间满足除以7余5、除以5余3、除以3余1的所有整数的个数。程序中有两行有错误。改正错误，使它能输出正确的结果。（9）

35. 程序功能：求1到5000之间的能被5整除的前若干个偶数之和，直到和大于500为止。程序中有两行有错误。改正错误，使它能输入正确的结果。（550）

36. 程序功能：百钱百鸡问题。用100钱买100只鸡，公鸡一只五钱，母鸡一只三钱，雉鸡三只一钱，编程计算共有几种买法（要求每种鸡至少要买一只）。程序中有一行有错误。改正错误，使它能输入正确的结果。（3）

37. 程序功能：求500以内最大的10个能被13或17整除的自然数之和。程序中有两行有错误。改正错误，使它能输入正确的结果。（4622）

38. 程序功能：求（10，1000）之间的所有完数之后。各真因子之和（不包括自身）等于其本身的正整数称为完数。例如：6=1+2

+3，6是完数。程序中有错误。改正错误，使它能输入正确的结果。（524）

39. 程序功能：求满足以下条件的（a,b,c）的组数：（1）1(a^2)+1(b^2)=1(c^2);（2）a>b>c;(3)a+b+c<100. 程序中有错误。改正错误，使它能输入正确的结果。（2）

40. 程序功能：求四位数中，各位数之积（积不为0）是60的倍数的数之和。程序中有一行有错误。改正错误，使它能输入正确的结果。（3456254）

41. 程序功能：有一堆零件（零件个数不超过1000），如果分为4个零件一组余2个，7个一组余3个；9个一组余5个，求这堆零件的个数有几种可能。程序中有错误。改正错误，使它能输入正确的结果。（4）

42. 程序功能：求共有几组i、j、k符合算式ijk+kji=1534,其中i、j、k是0~9之间的一位整数。程序中有一行有错误。改正错误，使它能输入正确的结果。（5）

43. 程序功能：求多有符合算式ij*ji=1300的最小数ij.其中i、j是1~9之间的一位整数。程序中有三行有错误。改正错误，使它能输入正确的结果。（25）

44. 程序功能：求（444，666）中最大的素数。程序中有两行有错误。改正错误，使它能输入正确的结果。（661）

45. 程序功能：将50元兑换成5元、2元和1元的方法的种数（每种面额至少2张）。程序中有两行有错误。改正错误，使它能输入正确的结果。（72）

46. 程序功能：求这样的一个三位数，其个位数不大于2.若将各位数移动到百位之间（如：321移城132），新三位数大于原三位数的两倍。程序中有两行有错误。改正错误，使它能输入正确的结果。（102）

47. 编程求方程5x+4y=2,在|x|<=50,|y|<=100内的整数解，x+y最大值是多少？（112）

48. 求方程5x-4y=2,在|x|<=100,|y|<=50内的整数解中|x|+|y|最大值？（86）

49. 找出1-1000之间的全部同构数的和。同构数是指一个数，它出现在它的平方数的右端。例如，5的平方是25，5是25中右端的数，5就是一个同构数。同理，25也是一个同构数。（1114）

50. 程序功能：求字符串”87IM&2345kjwdssdcf”中数，字母字符的ASCII码之和。程序中有一行有错误。改正错误，使它能输入正确的结果。（1113）

51. 求字符串”This is my Basic”所有字符的ASCII码之和。程序中有一行有错误。改正错误，使它能输入正确的结果。（1436）

52. 求1，2，3„，100中，任选两个不同的数，要求它们的和能被3和7整除的数的对数（注意：3+5和5+3认为是同一对数）。（2121

53. 一个两位数的正整数，如果将其个位数与十位数字对调所生成的数称为对调数，入28是82的对调数。现给定一个两位的正整数46，请找到另一位两位数的整数，使这两个数之和等于它们的各自的对调数之和。这样的另一个两位数有多少个。程序中有两行有错误。改正错误，使它能输入正确的结果。（8）

54. 程序功能：若某整数N的所有因子之和等于N 的倍数，则N称为多因子完备数，如数28，其因子之和=1+2+4+7+14+28=56=2*28,28是多因子完备数。改正错误，使它能输入正确的结果。（4）

55. 若一个四位数正整数是另一个正整数平方，且各位数字的和是一个平方数，则称该四位正整数是“四位双平方数”,例如：由于7398=86^2，且7+3+9+6=25=5^2，则称7396是”四位双平方数。求最小的“四位双平方数”。程序中有一行有错误。改正错误，使它能输入正确的结果。（1521）

56. 程序功能：求10的阶乘，程序中有一行有错误。改正错误，使它能输入正确的结果。（3628800）

57. 程序功能：求整数2310的所有质因子（即所有为素数的因子）之和。程序的isprime()

函数中有一行有错误。改正错误，使它能输入正确的结果。（28）

58. 计算两个数的最大公约数。程序中有一行有错误。改正错误，使它能输入正确的结果。（27）

59. 程序功能：建立一个过程来计算12的阶乘，程序中有错误。改正错误，使它能输入正确的结果。（479001600）

60. 程序功能：计算两个数的最小公倍数。程序中有两行有错误。改正错误，使它能输入正确的结果。（26288）

编程题

1. 已知数列前三项为0、0、1以后每项为前三项的和，求此数列的第36项（334745777）

2. 求数列21,32,53.85„„，的前10项的和。（16.47991）

3. 计算y=1+23+35+47+„+n(2*n-1)(n=50),要求；按四舍五入的方法精确到小数点后第二位。（26.47）

4. 编程求fibonacci数列：1，1，2，3，5，8„„的前30个数的和。（2178308）

5. 编写程序，求一正整数等差数列的前五项的立方和，该数列前四项之和是26、之积那是880。（4720）

6. 编写程序，求在10-1000之间所有能被4除于3，被7除余4，被9除余4的数的平方和。（1109620）

7. 编写程序，统计200-300之间的所有满足三个数字之积为24，三个数字之和为10的数的个数。（2）

8. 编写程序，计算1000以内有多少个这样的数，其十位数为6且能被8整除。（15）

9. “水仙花数”是指这样是数，其各位数字的立方和等于该数本身，编写程序求100至999的范围有多少个水仙花数。（4）

10. 编写程序，求满足下列条件的所有四位数ABCD的个数，该四位数是8的倍数，且A+B=B+C,即第1位数加上第2位数加上第3位数。（110）

11. 求方程8x-5y=3在|x|<=150,|y|<=200内的整数解的组数；（50）|x|*|y|的最大值（24676）

12. 所谓回文数是从左至右或从右至左读起来都是一样的数字，如121是一个回文数。编写程序，计算从1931年开始到3000为止，共有多少个年号是回文数年号。（11）

13. 计算在0至99的范围内有多少个数，其每位数的乘积大于每位数的和。（63）

14. 有一个三位数满足下列条件：（1）三位数各不相同；（此数等于它的各位数的立方和）

15. 求共有几组i，j，k符合算式ijk+kji=1534，其中i，j，k是0~9之间的一位整数。（5）

16. 有30个学生一起买小吃，共花钱50元，其中每个大学生花3元，每个中学生花2元，每个小学生花1元，问大、中、小学生的人数分配有多少种不同的解（去掉某类学生数为0的解）（9）

17. 求方程9x+4y=1000的正整数解的组数以及|x-y|的最大值（27，237）

18. 有5羊4犬3鸡2兔值钱1496，4羊2犬6鸡3兔值钱1175，3羊1犬7鸡5兔值钱958，2羊3犬5鸡1兔值钱861，求鸡值钱多少？（23）

19. 求1到5000之间的能被5整除的前若干个偶数之和，直到和大于500为止。（550）

20. 已知：s=1+3+5+7+9+„，求S不大于750最大值。（729）

21. 已知：s=2+4+8+16+32+„，求S不大于1500的最大值。（1022）

22. 统计1000~9999之间的完全平方数的个数，如25=5^2,25就是一个完全平方数。（68）

23. 统计1000-9999之间的所有满足以下条件的四位数的个数。该四位数是一个完全平方数，且第1为与第3位数字之和为12，第2位与第4位数字之积为24.（1）

24. 求（100，200）间有奇数个不同的整数因子的个数（5）

25. 求（200，300）之间的有奇数个不同因子的最大整数（289）

26. 已知24有8个正整数因子（即：1，2，3，4，6，8，12，24），而24正好被其因子个数8整除。问（100，300）之间有多少个这样的数。（19）

27. 一个数如果刚好与小于它的所有因子之和相等，则称该数为一个“完数”，如：6=1+2+3,则6就是一个碗数。求出400以内的所有完数之和。（34）

28. （3，500）内所有的素数之和。（21534）

29. 求（1，1000）之间有多少个同构数。同构数是这样一个数，它出现在它的平方数的右侧，例如：5的平方是25，25的平方是625，故5和25都是同构数。（7）

30. 编写程序，求出3到200之间的所有非偶数非素数的数的个数。（54）

31. 编写程序，求在3000以内能被17或者23整除的正整数的个数。（299）

32. 编写程序，求在1000以内能被17或者23整除的正整数的个数。（99）

33. 编写程序，求在5000以内能被17或者23整除的正整数的个数。（499）

34. 编写程序，求在1~3000以内能被3或者5整除的正整数的个数。（400）

35. 编写程序，求在1~6000以内能被3或者5整除的正整数的个数。（2800）

36. 编写程序，求在1~7000以内能被3或者7整除的正整数的个数。（3000）

37. 编写程序，求在1~5000以内能被3或者7整除的正整数的个数。（2142）

38. 编写程序，求在1~4000以内能被3或者11整除的正整数的个数。（1575）

39. 编写程序，求出100到500之间同时满足除5余4和除7余2条件的个数（12）

40. 编写程序，求出100到500之间同时满足除5余4和除7余2条件的和（3678）

41. 编写程序，求出100到400之间同时满足除3余2和除5余3条件的个数（20）

42. 编写程序，求出100到400之间同时满足除3余2和除5余3条件的和（5110）

43. 编写程序，求出100到200之间同时满足除3余2和除5余3条件的个数（6）

44. 编写程序，求出1到300之间同时满足除3余2和除5余3条件的个数（20）

45. 编写程序，求出100到500之间同时满足除3余2和除5余3条件的个数（26）

46. 编写程序，求出1到400之间同时满足除3余2和除5余3条件的个数（27）

47. 编写程序，求出100到600之间同时满足除3余2和除5余4条件的个数（33）

48. 编写程序，求出1到600之间同时满足除3余2和除5余3条件的个数（40）

49. 编写程序，计算[1，1000]以内有多少个这样的数，该数既能被6有能被8整除。（41）

50. 编写程序，求在200~1000之间所有能被4除余3，被7除余5，被9除余2的数的和（1653）

51. 编写程序，求在500~1000之间所有能被5除余3，被7除余5，被9除余7的数的和（1283633）

52. 编写程序，求在10~1000之间所有能被4除余3，被7除余4，被9除余4的数的和（1780）

53. 编写程序，求在200~1000之间所有能被4除余3，被7除余4，被9除余4的数的和（1713）

54. 编写程序，求在200~1000之间所有能被5除余3，被7除余5，被9除余7的数的和（1884）

55. 编写程序，求在10~1000之间所有能被4除余3，被7除余5，被9除余7的数的和（1700）

56. 编写程序，求在10~1000之间所有能被4除余3，被7除余4，被9除余4的数的平方和（1109620）

57. 编写程序，求[1,500]既能被3整除又能被5整除的数的个数（33）

58. 编写程序，求[1,500]既能被6整除又能被7整除的数之和（2772）

59. 编写程序，一个数如果刚好与它所有的因子之和相等，则称该数为一个“完数“，如：6=1+2+3，则6就是一个完数。求出200到500之间所有的完数之和（496）

60. 编写程序，一个数如果刚好与它所有的因子之和相等，则称该数为一个“完数“，如：6=1+2+3，则6就是一个完数。求出1000以内的所有的完数之和（530）

61. 编写程序，一个数如果刚好与它所有的因子之和相等，则称该数为一个“完数“，如：

6=1+2+3，则6就是一个完数。求出1000以内的所有的完数的个数（3）

62. 编写程序，一个数如果刚好与它所有的因子之和相等，则称该数为一个“完数“，如：6=1+2+3，则6就是一个完数。求出10000以内的所有的完数之和（8658）

63. 编写程序，一个数如果刚好与它所有的因子之和相等，则称该数为一个“完数“，如：6=1+2+3，则6就是一个完数。求出1000以内的所有完数的平方和（246836）

64. 编写程序，一个数如果刚好与它所有的因子之和相等，则称该数为一个“完数“，如：6=1+2+3，则6就是一个完数。求出400以内所有的完数之和（34）

65. 编写程序，一个数如果刚好与它所有的因子之和相等，则称该数为一个“完数“，如：6=1+2+3，则6就是一个完数。求出10000以内的完数的个数（4）

66. 编写程序，一个数如果刚好与它所有的因子之和相等，则称该数为一个“完数“，如：6=1+2+3，则6就是一个完数。求出600以内的所有完数的平方和（246836）

67. 编写程序，已知一个数列的前3个数为0，0，1，以后每个数为前3个数的和，编程序求此数列的第36个数（334745777）

68. 编写程序，已知一个数列的前3个数为0，1，2，以后每个数为前3个数的和，编程序求此数列的第30个数（24548655）

69. 编写程序，已知一个数列的前3个数为0，1，1，以后每个数为前3个数的和，编程序求此数列的第20个数（35890）

70. 编写程序，已知一个数列的前3个数为0，1，2，以后每个数为前3个数的和，编程序求此数列的第25个数（1166220）

71. 编写程序，已知一个数列的前3个数为1，2，3，以后每个数为前3个数的和，编程序求此数列的第20个数（101902）

72. 编写程序，已知一个数列的前3个数为0，1，2，以后每个数为前3个数的和，编程序求此数列的第35个数（516743378）

73. 编写程序，已知一个数列的前3个数为1，2，3，以后每个数为前3个数的和，编程序求此数列的第35个数（9504399251）

74. 编写程序，，已知一个数列的前3个数为3，4，5，以后每个数为前3个数的和，编程序求此数列的第33个数（537346739）

75. 编写程序，已知一个数列的前3个数为3，4，5，以后每个数为前3个数的和，编程序求此数列的第28个数（25527448）

76. 编写程序，已知一个数列的前3个数为3，4，5，以后每个数为前3个数的和，编程序求此数列的第26个数（7545856）

77. 编写程序，求四位数的偶数中，所有各位数字之和是15的倍数的数的和（1592376）

78. 编写程序，求四位数的偶数中，所有各位数字之和是15的倍数的数的个数（306）

79. 编写程序，求三位数的偶数中，所有各位数字之和是15的倍数的数的和（20454）

80. 编写程序，求三位数的奇数中，所有各位数字之和是15的倍数的数的和（19731）

81. 编写程序，求三位数的奇数中，所有各位数字之和是12的倍数的数的和（20292）

82. 编写程序，求三位数的奇数中，所有各位数字之和是12的倍数的数的个数（38）

83. 编写程序，求四位数的偶数中，所有各位数字之和是24的倍数的数的和（1298323）

84. 编写程序，求四位数的偶数中，所有各位数字之和是24的倍数的数的个数（187）

85. 编写程序，求四位数的奇数中，所有各位数字之和是25的倍数的数的和（1298515）

86. 编写程序，计算1000以内有多少个这样的数，其个位数为6且该数能被9整除（11）

87. 编写程序，计算1000以内有多少个这样的数，其十位数为6且该数能被8整除（15）

88. 编写程序，求三位数的偶数中，所有各位数字之和是15的倍数的数的个数（34）

89. 编写程序，求四位数的偶数中，所有各位数字之和是30的倍数的数的和（288840）

90. 编写程序，计算在0到50的范围内有多少个数，其每位数的乘积大于每位数的和（23）

91. 编写程序，计算在0到50的范围内有多少个数，其每位数的乘积小于每位数的和（26）

92. 编写程序，计算在0到99的范围内有多少个数，其每位数的乘积大于每位数的和（63）

93. 编写程序，计算在0到99的范围内有多少个数，其每位数的乘积小于等于每位数的和（37）

94. 编写程序，计算在0到60的范围内有多少个数，其每位数的乘积大于每位数的和（31）

95. 编写程序，求四位数的奇数中，所有各位数字之积（且不为0）是125的倍数的数的和（161095）

96. 编写程序，求四位数的奇数中，所有各位数字之积（且不为0）是60的倍数的数的和（2356254）

97. 编写程序，求四位数的偶数中，所有各位数字之积（且不为0）是30的倍数的数的和（3415206）

98. 编写程序，求四位数的偶数中，所有各位数字之积（且不为0）是18的倍数的数的和（8638596）

99. 编写程序，求四位数的偶数中，所有各位数字之和是6的倍数的数的和（4135248）

100. 编写程序，统计200到400之间的所有满足三个数字之积为42，三个数字之和为12的数的个数（4）

101. 编写程序，统计200到300之间的所有满足三个数字之积为24，三个数字之和为10的数的个数（2）