Евгений
Как вычесть процент из числа в Delphi?
var
a,b:variant;
begin
a:=StrToFloat(Edit2.Text);
b:=StrToFloat(Edit3.Text);
Edit4.Text:=FloatToStr(a-b%); //что писать в скобках не знаю
end;
var
a,b:variant;
begin
a:=StrToFloat(Edit2.Text);
b:=StrToFloat(Edit3.Text);
Edit4.Text:=FloatToStr(a-b%); //что писать в скобках не знаю
end;
var
a,b:variant;
begin
a:=StrToFloat(Edit2.Text);
b:=StrToFloat(Edit3.Text);
Edit4.Text:=FloatToStr(a-(a * (b/100)));
end;