Excle计算问题，求3个数的平均数？

如果要编一个算平均数的程序，怎么

我没学过jade，但是这个看上去很好懂，所以……我试着解释一下。 ars 变量定义 num:RealArray; 定义num为实数数组 index:Integer; 定义index为整数型 value:Real; 定义value为实数型 begin ...全部

  我没学过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中的数字就是这些数的平均数。收起