проценты в delphi

[monty "2"]

Владелец автомобиля приобрел новый карбюратор, который экономит 50% топлива, новую систему зажигания, которая экономит 30% топлива и поршневые кольца, экономящие 20% топлива. Верно ли что его автомобиль сможет обходиться совсем без топлива найти фактическую экономию для произвольно заданных процентов.

Есть код, но не верный- подправьте

a:= strTOfloat(Edit1.Text); //50%
b:= strTOfloat(Edit2.Text); //30%
c:= strTOfloat(Edit3.Text); //20%
otv:= ((a/100)*(b/100)*(c/100));
Label5.Caption:=FloatTOstr(otv);

[RUSt88]

Верно ли что его автомобиль сможет обходиться совсем без топлива

совсем не верно, просто трата топлива в 2 раза меньше

[monty "2"]

почему таки выводы?

[RUSt88]

простая логика

[monty "2"]

ну объясни

[CodeExpert]

Ну допустим что топлива 100 литров, если за счет карбюратора потребление уменьшилось на 50% то уж 50 литров, да еще за счет новой системы зажигания, то есть от 50 литров еще 15 литров, теперь потребление 35 литров, да еще поршневые кольца 20% от 35 литров, получается 35-7=28 литров...

[monty "2"]

ну вроде ясно только ответ 28 литров

[CodeExpert]

Ну тогда так:

a:= strTOfloat(Edit1.Text); //50%
otv:= ((a*0,5)*0,3)*0,2;
Label5.Caption:=FloatTOstr(otv);