题目
用VB写出1-100的所有奇数和偶数和
提问时间:2020-08-03
答案
Private Sub Command1_Click()Dim i,sum1,sum2 As Integersum1 = 0sum2 = 0For i = 1 To 100If i Mod 2 = 1 Thensum1 = sum1 + iElsesum2 = sum2 + iEnd IfNext iPrint "奇数和为" & sum1Print "偶数和为" & sum2End...
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1甲数的小数点向右移动一位后就和已数相等+已数比甲数多42.3+甲数是?
- 2Danny is waiting for his Dad.(划线提问is wait for his Dad)
- 3在直径0.8米的水管中,水流速度是每秒2米,那么1分钟从水管中流过的水有多少立方米?
- 4汉译英:路不平,小心地面
- 5they were singing a moment ago对singing进行提问
- 6你对六年级语文下册第一单元的课文有什么感悟
- 7硫化钠的第一步水解方程式
- 8谁有校运动会广播稿10片,每篇200字左右,悬赏5分好的的话多加几分,要短文,不要诗歌.
- 9小明和小丽共收集邮票171枚,已知小明收集的3/4和小丽收集的3/5相等,小明和小丽分别收集多少邮票?
- 1018除以62,如果商是一位数,里可以填〈〉,如果商是两位数,里可以填〈〉.
热门考点