题目
用VB程序写出“利用随机函数产生20个50~100范围内的随机数,显示他们的最大值、最小值和平均值.”怎么写
提问时间：2020-12-20
答案
dim a,max,min,sum,average
sum=0
max=20
min=50
for i=1 to 20
a=(Rnd * 50) + 50
sum=sum+a
if amax then max=a
print a
next
print max
print min
average=sum/20
print average
sum=0
max=20
min=50
for i=1 to 20
a=(Rnd * 50) + 50
sum=sum+a
if amax then max=a
print a
next
print max
print min
average=sum/20
print average
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1这个句子怎么翻译?She has made drawing the focus（重心） of her life.
- 2bring about bring in 什么区别 ? 谢谢
- 3(x+a/x)(2x-1/x)^5的展开式中各项系数的和为2,则该展开式中常数项为?40 ,
- 4U={X,-3小于等于X小于等于3},M={X,-1
- 5怎么用尺规做直角三角形?最好附图.
- 6甲筐苹果比乙筐苹果重14千克，甲筐卖出4/7，乙筐卖出2/5后，两筐剩下的苹果质量相等，原来甲筐有多少千克苹果？
- 7who cooks for you every day?
- 8定义域为R的偶函数f（x），当x＞0时，f（x）=lnx-ax（a∈R），方程f（x）=0在R上恰有5个不同的实数解． （1）求x＜0时，函数f（x）的解析式； （2）求实数a的取值范围．
- 9化什么为什么成语
- 10初一语文上册第二课走一步,再走一步后面研讨与练习第三题,
热门考点