如果要编一个算平均数的程序,怎么用jade,java,vb来做比方说一个用户要输入n个数据,之后根据这n个数据进行相加,最后除于它的个数,算出平均数,怎么进行编程?希望最后都能给解释一下!
这个是jade的
vars
begin
creat num transient;
index:=1;
write"please input a number that is not 0";
read value;
while value<>0 do;
num[index]:=value;
index:=index+1;
read value;
endwhile;
end;
我希望会的人,能帮我解释一下,我将感激不禁的!。
我没学过jade,但是这个看上去很好懂,所以……我试着解释一下。
ars 变量定义
num:RealArray; 定义num为实数数组
index:Integer; 定义index为整数型
value:Real; 定义value为实数型
begin 程序开始
creat num transient; (不知道!)
index:=1; 给index赋值1
write"please input a number that is not 0"; 输出“请输入一个不是0的数字”
read value; 读入数据到value
while value<>0 do; 当value不是0时:
num[index]:=value; 给num的第index个元素赋值;value
index:=index+1; index自加1;
read value; 读入数据到value
endwhile; 。
end; 程序结束
不过这个程序里面好像没有相除的代码啊。而且没有输出。
这个…不对吧?
相应的vb代码(其实在Basic里面也可以运行,稍微改一改输入的函数就可以了):
Dim num As Double, Index as Integer, value as Double
index = 1
value=InputBox("请输入一个不是0的数字")
While value <> 0
num = num + value
index = index + 1
value=InputBox("请输入一个不是0的数字")
Wend
index = index - 1
msgbox value/index
最后msgbox中的数字就是这些数的平均数。