等考程序题集(总).xlsVIP

程序改错(2级) 程序填空(2级) 编程(2级) 编程1级 ProgramingInfo 所谓素数是指这样的自然数，除1和它本身外不再有其它因子。编写程序，计算从1981年开始到3000年为止，我们将遇到多少个素数年号。 131 编写程序，计算[1，1000]以内有多少个这样的数，该数既能被6整除又能被8整除。 编写程序，求出3到200之间的所有非偶数非素数的数之和。 5774 编写程序，求出3到100之间的所有非偶数非素数的数之和。 1441 编写程序，求出3到100之间的所有非偶数非素数的数的个数。 编写程序，求出3到200之间的所有非偶数非素数的数的个数。 编写程序，计算在0至99的范围内有多少个数，其每位数的乘积大于每位数的和。 编写程序，计算在0至99的范围内有多少个数，其每位数的乘积小于等于每位数的和。 编写程序，求在10~1000之间所有能被4除余3，被7除余5，被9除余2的数之和。 1700 编写程序，求在200~1000之间所有能被4除余3，被7除余5，被9除余2的数之和。 1653 编写程序，计算1000以内有多少个这样的数，其个位数为6且该数能被9整除。 编写程序，计算1000以内有多少个这样的数，其十位数为6且能被8整除。 编写程序，求出1到5000之间的能被7整除的前若干个数之和，当和值大于等于1500时退出并输出和值。 1617 编写程序，求出1到3000之间的能被3整除的前若干个数之和，当和值大于600时退出并输出和值。 630 一个数如果刚好与小于它的所有因子之和相等，则称该数为一个“完数”，求出600以内的所有完数的平方和。 246836 编写程序，求出1到2000之间的能被9整除的前若干个数之和，当和值大于500时退出并输出和值。 594 编写程序，求在10~1000之间所有能被4除余3，被7除余4，被9除余4的数之和。 1780 编写程序，求出1到6000之间的能被5整除的前若干个偶数之和，当和值大于650时退出并输出和值。 编写程序，求在200~1000之间所有能被4除余3，被7除余4，被9除余4的数之和。 编写程序，求出1到7000之间的能被5整除的前若干个偶数之和，当和值大于500时退出并输出和值。 编写程序，求在200~1000之间所有能被5除余3，被7除余5，被9除余7的数之和。 1884 编写程序，求出1到4000之间的能被5整除的前若干个偶数之和，当和值大于400时退出并输出和值。 450 编写程序，求在500~1000之间所有能被5除余3，被7除余5，被9除余7的数的平方和。 1283633 编写程序，求出1到8000之间的能被5整除的前若干个偶数之和，当和值大于750时退出并输出和值。 780 编写程序，求在10~1000之间所有能被4除余3，被7除余4，被9除余4的数的平方和。 1109620 一个数如果刚好与小于它的所有因子之和相等，则称该数为一个“完数”，如：6=1+2+3。求出10000以内的所有完数之和。 8658 一个数如果刚好与小于它的所有因子之和相等，则称该数为一个“完数”，求出1000以内的所有完数的平方和。 编写程序，求满足下列条件的所有四位数ABCD的个数，该四位数是8的倍数，且A+B=B+C，即第1位数加上第2位数等于第2位数加上第3位数。 110 编写程序，求满足下列条件的所有四位数ABCD的个数，该四位数是18的倍数，且D=6 ,A+B=B+C，即第1位数加上第2位数等于第2位数加上第3位数。 编写程序，求满足下列条件的所有四位数ABCD的个数，该四位数是16的倍数，且B=8，,A+B=B+C，即第1位数加上第2位数等于第2位数加上第3位数。 编写程序，求满足下列条件的所有四位数ABCD的个数，该四位数是8的倍数，且A+D=B+C，即第1位数加上第4位数等于第2位数加上第3位数。 77 编写程序，求满足下列条件的所有四位数ABCD的个数，该四位数是15的倍数，且A+D=B+C，即第1位数加上第4位数等于第2位数加上第3位数。 编写程序，求满足下列条件的所有四位数ABCD的个数，该四位数是9的倍数，且A= B+C，即第2位数加上第3位数等于第1位数。 64 编写程序，求在200~2000之间所有能被4除余2，被7除余3，被9除余5的数之和。 7910 编写程序，求在10~1000之间所有能被4除余2，被7除余3，被9除余5的数之和。 2000 编写程序，求满足下列条件的所有四位数ABCD的个数，该四位数是11的倍数，且A=B+C，即第2位数加上第3位数等于第1位数。 SET TALK OFF CLEA P=0 S=1 FOR I=1 TO 20000 IF MOD(I,2)0 S=______ ELSE P=______ ENDI ENDF ?P