编写程序,输入3个整数,计算并输出它们的平均值
题目
编写程序,输入3个整数,计算并输出它们的平均值
答案
Dim i1 As Integer
Dim i2 As Integer
Dim i3 As Integer
i1 = Val(InputBox("请输入第一个整数"))
i2 = Val(InputBox("请输入第二个整数"))
i3 = Val(InputBox("请输入第三个整数"))
MsgBox "你输入三个数的平均值为：" & (i1 + i2 + i3) / 3
举一反三
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点
- 135°=【 】平角=【 】周角,2700〃=【 】｀=【 】°
- “红橙黄绿蓝靛紫”还是“红橙黄绿青蓝紫”?哪个说法对?
- 有一列数：3,6,8,8,4,2----从第三个数起每个数都是前两个数乘积的个位数字.那么这列数的第2003个数
- I am the most special ：
- 数列-5,-8,-11,-14……按规律排列的,若这一数列中某两个相邻的数的和为-127,求这两个数.
- 已知a,b,c是△ABC的三边,适合等式a^2+b^2+c^2=ab+bc+ca试判断此三角型的形状.
- 把下列非负数写成一个数的平方的形式
- 数控车G54指令怎么设立坐标系啊.怎么偏移机床坐标系 我先对刀,把工件坐标系原点机床坐标在MDI方式下输入
- maybe you are right
- 周晓枫散文读书笔记（也就是读后感）