|
Считаем проценты под Delphi
как проверить, если в Edit1 ничего не ввели, значит считать X:= X=(S : ((Y*Z)+100))*100 , если Edit2 - то Y=((S-X) : Z) : (X : 100)
Также, какой тип лучше использовать, чтобы посчитать всё это и как поотом вывести? В те же самые Edit-ы. Желательно использовать Integer, даже если числа получаются нецелочисленные, всё равно нужны только округлённые!
вот как условия задачи мои звучат:
edit1 (x) вклад
edit2 (y) процент
edit3 (z) срок хранения (г.)
edit4 (s) итоговая сумма
X=(S : ((Y*Z)+100))*100
Y=((S-X) : Z) : (X : 100)
Z=(S-X) : ((X : 100)*Y)
S=X+((X : 100)*Y)*Z
По этим выражениям рассчитываются все представленные значения. Как я уже говорил - по трем известным вычисляется одна неизвестная. Вклад осуществляется в рублях, обычное число от 1-го и до бесконечности, итоговая сумма то же самое, процент от 1 до 100, срок хранения от 1-го года и до бесконечности, так же срок хранения только в годах, не может быть значений типа 0,8 или 2,4 т.к. в году 12 месяцев, да и лишний головняк никчему.
|