VB:随机产生30个[100,500]区间的随机整数,求其和及平均值.
题目
VB:随机产生30个[100,500]区间的随机整数,求其和及平均值.
答案
Dim sum As Integer
Dim cun As Double
sum =0
For i = 0 To 29
Randomize
sum = sum + Int((500 - 100) * Rnd + 100)
Next
cun = sum / 30
print sum
print cun
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
- 已知函数f(x)=2sinωxcosωx(ω>o,x属于R)
- 产品的合格率可以达到100%吗?
- 木材公司运进一批木材.已知最底层是102根,以上每层比下一层少1根,共有32层,这些木材共有多少根?(要完整...
- 甲乙两地相距90km,某车从甲地开往乙地,先以48km/h得平均速度走了一半路程后以60km
- 绝对值有负数吗
- “六•一”儿童节那天,小强去商店买东西,下面是小强和商店里阿姨的对话: 小强:阿姨!我有10元钱,想买一盒饼干和一袋牛奶. 售货员:小朋友!按原价用10元钱买一盒饼干是有剩的
- 初一的读书笔记一般要多少字?
- 一辆车13:00从甲地出发开往乙地,3小时行135km.,已行全程的3/4,这辆汽车能否在17:30到乙地?
- 一个梯形的面积是100平方分米,高是10分米,上底是6分米下底是()分米
- 由3个十,9个百分之一,4个千分之一组成的小数是
热门考点