vb程序设计40924.docVIP

8001题: 编写程序，求共有几组i、j、k符合算式ijk+kji=1333，其中i、j、k是0~9之间的一位整数。 原程序： 答案：6 8002题: 编写程序，求四位数的偶数中，所有各位数字之和是15的倍数的数的和。 原程序： 答案：1592376 8003题: 编写程序，求三位数的偶数中，所有各位数字之和是15的倍数的数的和。 原程序： 答案：20454 8004题: 编写程序，求三位数的奇数中，所有各位数字之和是15的倍数的数的和。 原程序： 答案：19731 8005题: 编写程序，求三位数的奇数中，所有各位数字之和是12的倍数的数的和。 原程序： 答案：20292 8006题: 编写程序，求三位数的奇数中，所有各位数字之和是12的倍数的数的个数。 原程序： 答案：38 8007题: 编写程序，求在四位数的奇数中，所有各位数字之和是25的倍数的数的和。 原程序： 答案：1298515 8008题: 编写程序，求三位数的偶数中，所有各位数字之和是15的倍数的数的个数。 原程序： 答案：34 8009题: 编写程序，求在四位数的偶数中，所有各位数字之和是30的倍数的数的和。 原程序： 答案：288840 8010题: 编写程序，求1到5000之间的能被5整除的前若干个偶数之和，当和值大于500时退出，输出该和值。 原程序： 答案：550 8011题: 编写程序，求在3000以内能被17或者23整除的正整数的个数。 原程序： 答案：299 8012题: 编写程序，求在1000以内能被17或者23整除的正整数的个数。 原程序： 答案：99 8013题: 一个数如果刚好与它所有的因子之和相等，则称该数为一个完数，如：6=1+2+3，则6就是一个完数。求出200到500之间所有的完数之和。 原程序： 答案：496 8014题: 编写程序，求在5000以内能被17或者23整除的正整数的个数。 原程序： 答案：499 8015题: 一个数如果刚好与它所有的因子之和相等，则称该数为一个完数，如：6=1+2+3，则6就是一个完数。求出1000以内的所有的完数之和。 原程序： 答案：530 8016题: 编写程序，求四位数的偶数中，所有各位数字之和是15的倍数的数的个数。 原程序： 答案：306 8017题: 一个数如果刚好与它所有的因子之和相等，则称该数为一个完数，如：6=1+2+3，则6就是一个完数。求出1000以内的完数的个数。 原程序： 答案：3 8018题: 已知一个数列的前3个数为0，0，1，以后每个数为前3个数的和，编程序求此数列的第36个数。 原程序： 答案：334745777 8019题: 一个数如果刚好与它所有的因子之和相等，则称该数为一个完数，如：6=1+2+3，则6就是一个完数。求出10000以内的完数的个数。 原程序： 答案：4 8020题: 编写程序，求四位数的偶数中，所有各位数字之和是24的倍数的数的个数。 原程序： 答案：187 8021题: 一个数如果刚好与小于它的所有因子之和相等，则称该数为一个“完数”，如：6=1+2+3，则6就是一个完数。求出400以内的所有完数之和。 原程序： 答案：34 8022题: 编写程序，求四位数的偶数中，所有各位数字之和是24的倍数的数的和。 原程序： 答案：1298328 8023题: 编写程序，计算在0~50的范围内有多少个数，其每位数的乘积大于每位数的和。 原程序： 答案：23 8024题: 编写程序，求出1~7000以内能被3或者7整除的数的个数。 原程序： 答案：3000 8025题: 编写程序，计算在0~50的范围内有多少个数，其每位数的乘积小于每位数的和。 原程序： 答案：26 8026题: 编写程序，求出1~3000以内能被3或者5整除的数的个数。 原程序： 答案：1400 8027题: 用一元纸币兑换一分、两分和五分的硬币，要求兑换硬币的总数为50枚，问共有多少种换法？(注：在兑换中，一分、两分或五分的硬币数可以为0枚) 原程序： 答案：13 8028题: 编写程序，求出1~5000以内能被3或者7整除的数的个数。 原程序： 答案：2142 8029题: 用一元纸币兑换一分、两分和五分的硬币，要求兑换硬币的总数为30枚，问共有多少种换法？(注：在兑换中，一分、两分或五分的硬币数可以为0枚) 原程序： 答案：4 8030题: 编写程序，求出1~6000以内能被3或者5整除的数的个数。 原程序： 答案：2800 8031题: 用一元纸币兑换一分、两分和五分的硬币，要求兑换硬币的总数为60枚，问共有多少种换法？(注：在兑换中，一分、两分或五分的硬币数可以为0枚) 原程序： 答案：11 8032题: 把18元钱分成一元、二元和五元的纸币且纸币张数共为10张的分法有