已知S1=1,S2=1+2,S3=1+2+3,…SN=1+2+3+…+N,求S1,S2,S3,…S2200中有多少个能被3或7整除的数.
题目
已知S1=1,S2=1+2,S3=1+2+3,…SN=1+2+3+…+N,求S1,S2,S3,…S2200中有多少个能被3或7整除的数.
编程题!
有一处错误请修改一下 给出结果吧!
SET TALK OFF
CLEA
I=1
N=0
DO WHILE I
答案
Private Sub Command1_Click()
For i = 1 To 2200
a = a + 1
s = s + a
If s Mod 3 = 0 Then B1 = B1 + 1
If s Mod 7 = 0 Then B2 = B2 + 1
Next
Print "被3整除的有"; B1; "个"
Print "被7整除的有"; B2; "个"
End Sub
不好意思,只学VB,在网吧弄的~
答案是:B1=1466 B2=628
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
- 杜甫的诗句"------------------"写出了贫富悬殊的社会现象.
- 蛟龙号上一面积为50cm^2的观测窗口,求在7km深海深度的探测中承受海水的压强与压力多大?
- 证明:当n>1时,不存在奇素数p和正整数m使p^n+1=2^m;当n>2时,不存在奇素数p和正整数
- 为什么判断做圆周运动的小球能否通过最高点的依据只能是看到达最高点的速度是否大于根号下的gr呢?
- 浮点数规格化(计算机组成原理)
- 竖直上抛的物体,初速度是25米每秒,经过两秒的位移大小是多少
- 已知圆C:(x-30)^2+y^2=100及点A(-3,0),P是圆C上任意一点,线段PA的垂直平分线l与pc相交于Q点,求Q点的轨迹方程
- 已知27的A次方=3的2A+3次方,则A=_____?
- 怎样算2x加9=4x加2(用方程)
- Cl2与Ca(OH)2的反应中Cl2会不会跟水先反应
热门考点
- 在3点10分的英语
- 如图所示的电路中,各个电键均闭合,且k2接a,现要使静止在平行板电容器两极板之间的
- 符号*,*(a,b,c)=a+b-c分之a-b/c,则*(1,2,3)=()
- 这句话:Wohin mit diesem Bild?
- 诗歌体裁分类,有几个就写出来,不必要详细说明!
- 硫酸氢钠稀溶液与氢氧化钾溶液反应方程式
- 已知x^2+y^2-6x-8y+25=0,求分式1/xy的值
- 4(3x-4)平方=(4x-3)平方,用开平方解这方程
- 工程队修一条水渠,每天工作6小时,12天可以完成.如果工作效率不变,每天工作8小时,多少天可以完成任务?
- 8分之3的分之加上6,要使分数大小不变,分母应加上()