[Lost_in_forest]

Задача такая Для того, чтобы печенье было рассыпчатым, в него кладут пекарский порошок. В его состав входят пищевая сода – 25%, лимонная кислота – 15% и мука – 60%. Сколько соды, лимонной кислоты и муки надо взять, чтобы приготовить А г пекарского порошка?

[Bars1992]

PHP код:

var
a:integer;
begin
a:=500;
showmessage('25%='+floattostr(a*0.25));
showmessage('15%='+floattostr(a*0.15));
showmessage('60%='+floattostr(a*0.60));
end; 


[Страдалецъ]

тогда уж так:

Код:

Var a: Real;
begin
 a := StrToFloat(InputBox('Ввод','Задайте количество порошка в граммах:','0'));
 ShowMessage('25%='+floattostr(a*0.25)+#13'15%='+floattostr(a*0.15)+#13'60%='+floattostr(a*0.60));
end;