题目
VB:随机产生30个[100,500]区间的随机整数,求其和及平均值.
提问时间：2021-01-03
答案
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
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的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1把一条自由下垂的铁链上端悬挂在墙上,铁链的下方距它的下端3.2m处有一钉子,放开铁链后让它做自由落体运动
- 2左边一个王字旁,右边一个“成”念什么?
- 3某工厂贮存了一批煤,由于改进炉灶和烧煤技术,每天能节约2吨,
- 4已知函数f(x)=x^2-alnx在(1,2]是增函数,g(x)=x-a√x在(0,1)为减函数..
- 5甲车从A城到B城需要10小时,乙车速度是甲车多25%,如从不同方向对开,什么时间能相遇
- 62的2006次方+7的2006次方的末尾数.
- 7石头的成份是这样的.帮我看看是什么石头
- 8五年级暑假园地【英语】（十一）
- 9巧解趣题x9=题趣解巧 各代表几
- 101.某校六年级有女生120人,正好是男生人数的120％,男生有多少人?
热门考点