запутался в типах данных Опции

[MiH@N]

procedure TForm1.Button1Click(Sender: TObject);
var Ma,Mb,Mc : real;
a,b,c :integer;
begin
a:=StrToInt(Edit1.Text);
b:=StrToInt(Edit2.Text);
c:=StrToInt(Edit3.Text);
Ma:=sqrt(2*(sqr(b)+sqr©)-sqr(a))/2;
Mb:=sqrt(2*(sqr(a)+sqr©)-sqr(b))/2;
Mc:=sqrt(2*(sqr(b)+sqr(a))-sqr©)/2;
Edit4.Text:=intToStr(Ma);
Edit5.Text:=IntToStr(Mb);
Edit6.Text:=IntToStr(Mc);
end;

вопрос вот в чём: у Ma,Mb,Mc : real---но когда приковыриваешь их к полю (Edit4.Text:=intToStr(Ma);
Edit5.Text:=IntToStr(Mb);
Edit6.Text:=IntToStr(Mc);) то вылазит нестыковочка в типах данных----что надо поставить вместо IntToStr если числа не целые?

[MiH@N]

ага.токмо чёт так не получается. вылазит:

Добавлено через 2 мин.
хотя мож я чё нето сделал..вот текст:

procedure TForm1.Button1Click(Sender: TObject);
var Ma,Mb,Mc : real;
a,b,c :real;
begin
a:=StrToFloat(Edit1.Text);
b:=StrToFloat(Edit2.Text);
c:=StrToFloat(Edit3.Text);
Ma:=sqrt(2*(sqr(b)+sqr©)-sqr(a))/2;
Mb:=sqrt(2*(sqr(a)+sqr©)-sqr(b))/2;
Mc:=sqrt(2*(sqr(b)+sqr(a))-sqr©)/2;
Edit4.Text:=FloatToStr(Ma);
Edit5.Text:=FloatToStr(Mb);
Edit6.Text:=FloatToStr(Mc);
end;