Wieso ist das nicht definiert obwohl es definiert ist

[Vebob]

Bei mir wird der Fehler inkorekter Integer Typ angezeigt aber warum
wollte nen Literverbrauch pro 100KM machen mit ner Simme mit nen Tank von 8 Litern und reservreverbrauch
Das wär mein Code:
unit Unit1;

interface

uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;

type
TForm1 = class(TForm)
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
edtKMA: TEdit;
edtKME: TEdit;
lblKM: TLabel;
btnBerechnen: TButton;
Label4: TLabel;
edtTank: TEdit;
lblBVerbrauch: TLabel;
Verbrauch: TLabel;
lblVerbrauch: TLabel;
procedure btnBerechnenClick(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.btnBerechnenClick(Sender: TObject);
var intKMA, intKME, intKM, intBVerbrauch, intTank, sng8, sng100, intVerbrauch : integer;

begin
intKMA := StrToInt (edtKMA.Text);
intKME := StrToInt (edtKME.Text);
intKM := intKME-intKMA;
lblKM.Caption := IntToStr (intKM);
intTank := StrToInt (edtTank.Text);
intBVerbrauch := intTank - sng8 ;
lblBVerbrauch.Caption := IntToStr (intBVerbrauch);
intVerbrauch := intBVerbrauch/sng100*intKM; hier ist das Siliconon rot aber why???
lblVerbrauch.Caption := IntToStr (intVerbrauch);

end;

end.