| Предыдущая тема :: Следующая тема |
| Автор |
Сообщение |
Hellene
Зарегистрирован: 26.03.2007
Сообщения: 1
|
 Добавлено: Пн Мар 26 2007 14:44 Заголовок сообщения: как расчитать коэффициент в Дельфи? |
 |
|
| Всем здравствуйте. У меня большая проблема. Есть три поля: Edit1-вес, Edit2-рост, Edit3-коэффициент, который расчитывается по формуле вес/sqr(рост). Поле Edit2 содержит десятичные числа. Пользователь сам вводит в поле вес и рост значения, а поле Коэффициент расчитывает. Помогите пожалуйста написать код к программе в Дельфи. |
|
| Вернуться к началу |
|
 |
grf
Зарегистрирован: 05.04.2005
Сообщения: 1242
Откуда: Москва
|
| Добавлено: Вт Мар 27 2007 14:44 Заголовок сообщения: |
|
|
Используй функцию StrToInt(s string) integer
и IntToStr(i integer) string
Например так
| Код: |
var
rost,ves,parametr:integer;
Begin
rost:=StrToInt(Form1.Edit1.text);
ves:=StrToInt(Form1.Edit2.text);
parametr=rost/sqrt(ves);
Form1.edit3.text=IntToStr(parametr);
End;
|
Если числа не целые, а вещественные, т FloatToStr
_________________
Errare humanum est |
|
| Вернуться к началу |
|
|
|
FAQ 
Поиск 
Пользователи 
Группы
Регистрация
Профиль 
Войти и проверить личные сообщения 
Вход 
