高手请进啊!

Question

怎么求几个数的和
怎么求几个数的平均分
相关代码是什么?
怎么写啊?

Answer 1

var
  a,b,c:Double;
  Sum,AVR:Double;Sum:=a+b+c;
Avr:=Sum/3;

Answer 2

不好用啊!我加的是Edit和button组件啊!
var
Edit1,Edit2:Double;
sum:Double;
begin
sum:=Edit1+Edit2;
Edit3:=sum;end;end.
这哪里错了啊?

Answer 3

你首先要学的是怎样提问uses
  SysUtils;procedure TForm1.Button1Click(Sender:TObject);
var
  sum:Double;
begin
  sum:=StrToFloatDef(Edit1.Text,0)+StrToFloatDef(Edit2.Text,0);
  Edit3.Text:=FloatToStr(sum);end;

Answer 4

很好啊!谢谢啊!我都弄懂了啊!但是Edit1.Text,0这个0是什么意思啊?
我刚学的还 什么也不懂呢!
我一会给你分!!!!!!

Answer 5

如果EDIT1。TEXT不是一个有效的浮点数，就用0代替。
防止报错。