题目
分别求1--100之间3的倍数和7的倍数的和
提问时间：2020-07-24
答案
Dim I As Integer '循环引用变量 Dim Sum3 As Integer '存储3的倍数的和 Dim Sum7 As Integer '存储7的倍数的和 For I = 1 To 100 '求3的倍数的和 If I Mod 3 = 0 Then Sum3 = Sum3 + I End If '求7的倍数的和 If I Mod 7 = 0 Then Sum7 = Sum7 + I End If Next I '打印结果 Print Sum3,Sum7 我的回答应该是你想要的答案吧?
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
热门考点
- 1总产量 平均产量和 边际产量
- 2描写春风的诗句?
- 3在三角形ABC中，如果（a+b+c）（b+c-a）=3bc，那么A等于（ ） A.30° B.60° C.120° D.150°
- 4要把浓度为95%的酒精溶液800毫升,稀释成消毒用的浓度为76%的酒精溶液,需要加水多少毫升
- 5植物组织培养一般需要使用含有植物激素培养液吗
- 6阳城淀作者为我们描绘了一幅怎样的图景 这道题是八年级上课计划97页的
- 7y=logaX 导数是什么?
- 8什么是三中心二电子键,他与共价键有什么不同
- 9某服装店一套西服原价1000元,现在卖800元,这套衣服的价格降了几分之几?
- 10200mL密度为1.1g/cm³的H2SO4,质量分数为15%