网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
编写程序,计算出1000到5000之间能被3和7整除但不能被13整除的所有整数的和。
参考答案和解析
【审题关键句】千位+百位等于十位+个位，且千位+百位等于个位-千位的10倍。计算并输出这些四位自然数的个数cnt以及这些数的和。 【解题思路】 ①首先定义一个循环变量i，以及分别用来存放四位数分解之后各位数的变量qw(千位)、bw(百位)、SW(十位)和 gw(个位)。 ②通过for循环依次对数组中的每个四位数进行分解，循环初值为l 000，终值为5000，每循环一次，循环变量i的值加1。每分解一个四位数，根据题目要求，判断其“千位+百位=十位+个位”的条件是否满足，同时判断“(千位+百位)=(个位-千位)*10”的条件是否满足，两个条件之间用运算符进行连接。当同时满足以上两个判断条件时，计数变量cnt的值加l，同时将该四位数累加到求和变量sum中，最终得到满足条件的四位自然数个数cnt及它们的和sum。 本题中cnt和sum变量在源程序中已经定义，在该子程序中就不需要再重新定义了。 【参考答案】
更多 “编写程序,计算出1000到5000之间能被3和7整除但不能被13整除的所有整数的和。” 相关考题
考题
设有宏定义 :#define IsDIV(k,n) ((k%n==1)?1:0) 且变量 m 已正确定义并赋值 ,则宏调用 :IsDIV(m,5)IsDIV(m,7) 为真时所要表达的是A) 判断 m 是否能被 5 或者 7 整除B) 判断 m 是否能被 5 和 7 整除C) 判断 m 被 5 或者 7 整除是否余 1D) 判断 m 被 5 和 7 整除是否都余 1
考题
使用窗体的Click事件在窗体输出1～1000之间能同时被5和7整除的整数，如图所示，请填空Private Sub Form_Click()Dim i As IntegerDim Sum As IntegerClsFor i=1 To 1000If 【 】 ThenSum=Sum+iPrintiEnd IfNext iPrintPrint"Sum="SumEnd Sub
考题
现有以下程序： Private Sub Command1 Click（ ） c1=0 c2=0 For i=1 To 100 If i Mod 3=0 Then c1=c1+1 Else If i Mod 7=0 Then c2=c2+1 End If Next i Print c1+c2 End Sub 此程序运行后输出的是在1～100范围内（ ）。A.同时能被3和7整除的整数个数B.能被3或7整除的整数个数(同时被3和7整除的数只记一次)C.能被3整除，而不能被7整除的整数个数D.能被7整除，而不能被3整除的整数个数
考题
如果用一个圆来表示词语所指称的对象的集合，那么以下哪项中三个词语之间的关系符合下图？
A.①能被23整除的正整数，②6的因子，③10以内的正整数
B.①20的因子，②40以内的正整数，③能被43整除的正整数
C.①50以内的正整数，②能被41整除的正整数，③49的因子
D.①100以内的正整数，②87的因子，③能被73整除的正整数
考题
充分条件指的是对于两个命题X和Y，当X成立时，则Y成立，那么X是Y的充分条件；必要要条件指的是对于两个命题X和Y，当X不成立时，则Y不成立，那么X是Y的必要条件。
根据上述定义，下列哪项中X是Y的必要条件？A.X：该数能被6整除；Y：该数能被2整除
B.X：该数能被6整除；Y：该数能被4整除
C.X：该数能被3整除；Y：该数能被6整除
D.X：该数能被4整除；Y：该数能被3整除
考题
三段论：“因为3258的各位数字之和能被3整除，所以3258能被3整除”。前提是（）A、 “3258能被3整除”是小前提B、 “3258的各位数字之和能被3整除”是大前提C、 “各位数字之和能被3整除的数都能被3整除” 是省略的大前提D、 “3258能被3整除”是大前提
考题
单选题与命题“能被6整除的整数，一定能被3整除“等价的命题是（ ）．A
能被3整除的整数，一定能被6整除B
不能被3整除的整数，一定不能被6整除C
不能被6整除的整数，一定不能被3整除D
不能被6整除的整数，不一定能被3整除
考题
单选题三段论：“因为3258的各位数字之和能被3整除，所以3258能被3整除”。前提是（）A
“3258能被3整除”是小前提B
“3258的各位数字之和能被3整除”是大前提C
“各位数字之和能被3整除的数都能被3整除” 是省略的大前提D
“3258能被3整除”是大前提
考题
单选题何谓“双数”？双数就是()。A
能被2整除的整数B
个位上是0、2、4、6、8的整数C
正偶数，即能被2整除的正整数
热门标签
最新试卷