Verschachtelte Algorhytmen

[JuPi2904]

So ich bedanke mich ersteinaml für alle Antworten.
Um noch mal ein paar Fragen zu beantworten, ich will keinen fertigen Quelltext, sondern ich möchte die Struktur wissen, wie man so etwas generell programmiert.
Ich habe jetzt mal die Variante mit "and" probiert, wo allerdings ein Fehler aufgetreten ist: [Fehler] Unit1.pas(61): Operator ist auf diesen Operandentyp nicht anwendbar

Wenn ich dann ein "else" davor setze treten noch andere Fehler auf und mit der variante "case", die kenne ich leider noch nicht und weiß nicht wie ich sie umsetzen soll.

Hier mein Quelltext:

if 0<=stuck and stuck<100 then rabatt:=0;
if 100<=stuck and stuck<500 then rabatt:=0.05;
if 500<=stuck and stuck<=1000 then rabatt:=0.10;
if 1000<=stuck and stuck<=1500 then rabatt:=0.15 ;
if 1500<=stuck and stuck<2000 then rabatt:=0.20 ;
if 2000<=stuck then rabatt:=0.30;

Würde mich um eure Hilfe sehr freuen.
Mfg JuPi.