Kann mir jemand bei Delphi4 helfen ?

Ich muss über Delphi eine Aufgabe erledigen, und zwar die Einkommenssteuer berechnen.
:"Im Bereich von 5000 euro bis 20000 euro werden 22% Steuern erhoben"
ich hab den Ansatz dazu schon angefangen, aber ich komme leider nicht weiter.

IF
(Zahl1>5000) and (20000>Zahl1)
THEN
Zahl2 := Zahl1*0.22;
Ausgabe := EdtZahl1.text;
ErgebnisLbl.caption := Ausgabe;

weiß jemand vielleicht wo der Fehler ist ?
ich bräuchte die Antwort dringend :/
danke schonmal im vorraus.