ДИАЛОГОВОЕ ПРИЛОЖЕНИЕ

[Fon]

Создание диалогового приложения в среде разработки Delphi 7


Оцените силу натяжения ремней безопасности при столкновении автомобиля с неподвижной преградой по следующей формуле:
F=(m(V*V))/2S

где, m = 50..250 – масса водителя, кг;
S = 0.01..5 – глубина вмятины, м;
V = 1..300 – скорость автомобиля, м / c;
F – сила натяжения ремней безопасности, н;
K = 3,6 – коэффициент пересчёта скорости, ( км / ч ) / ( м / с )
Параметры m [ кг ] , S [ см ] , V [ км / час ] задаёт пользователь.
Параметр K – константа, определяемая программистом.
Программа должна вычислять натяжение ремней безопасности F в килограммах силы

[Sciv]

Особенно порадовала формула, которой нет


UPDATE. О, вот и формула появилась


И что конкретно вызывает затруднения?

[Fon]

Вообщем уже сделал саму картинку кнопочки все
вызывает затруднение какой код писать к этим кнопочкам
чтобы оно считало)

[Sciv]

m:=StrToInt(Edit1.Text);

преобразует строку в integer

S:=StrToFloat(Edit2.text);

преобразует строку в real

Ну вот так каждое текстовое поле преобразовать и вычислить по формуле F, после чего сделать обратное преобразование:

Edit1.Text:=FloatToStr(F);

Названия Edit приведены для примеров, адаптируйте под себя