решить легкий пример

← →
Ольга (2003-11-04 16:44) [0]

помогите, пожалуйста, написать программу в Delphi решения примера
t=1/b*sqrt(ln(1/(1-0.5*a), где а и b числа вводимые с клавиатуры.

← →
Skier © (2003-11-04 16:47) [1]

см. компонент TEdit и функции FloatToStr и StrToFloat

← →
MaG © (2003-11-04 19:54) [2]

....
procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.caption:=Inttostr(1/strtoint(edit1.text)*sqrt(ln(1/(1-0.5*strtoint(edit2.text)))));
end;

end.
В edit1.text записываем b
В edit2.text записываем a

только IntToStr здесь не пройдет, скорее FormatFloat

решить легкий пример Найти похожие ветки