Посмотрите пожалуйста, что тут не верно

[Один]

Впервые программирую на Delphi и что от у меня не получается(((. Вот код программы который уже написал:
procedure TForm1.Button1Click(Sender: TObject);
var a:Integer;
b:Integer;
c:Integer;
d:Integer;
e:Integer;
f:Integer;
j:Integer;
h: Real;
begin
a:=StrToInt(Edit1.Text);
b:=StrToInt(Edit2.Text);
c:=StrToint(Edit3.Text);
d:=StrToInt(Edit4.Text);
e:=StrToInt(Edit5.Text);
f:=StrToInt(Edit6.Text);
j:=StrToInt(Edit7.Text);

h:=(((a+(a/100)*b)+(e*d*c))+f)/100*j+(((a+(a/100)*b)+(e*d*c))+f);

Label8.caption:=FloatToSt(h);


Delphi говорит что ошибка в последней стороке(((, я не знаю может ошибка в типах данных или где то ещё...если можно объяснить более понятными словами)))

[Sweta]

может

Label8.caption:=FloatToStr(h);