Форум: "Основная";
Текущий архив: 2003.11.13;
Скачать: [xml.tar.bz2];

Вниз

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

← →
Ольга   (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

---

← →
aus   (2003-11-04 21:49) [3]

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

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.11.13;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.084 c