QBasic "IF-THEN" Problem!

[Whiz-zarD]

Code:

CLS
INPUT X#
INPUT Y#
Z# = X# / Y# 
IF Z# => 0,90 THEN
GOSUB Sehr_Gut
IF Z# < 0,90 AND  Z# => 0,80 THEN
GOSUB Gut
IF Z# < 0,80 AND  Z# => 0,75 THEN
GOSUB Befirdigend
IF Z# < 0,75 AND  Z# => 0,50 THEN
GOSUB Ausreichend
IF Z# < 0,50 AND  Z# => 0,30 THEN
GOSUB Mangelhaft
IF Z# < 0,30 AND  Z# => 0,00 THEN
GOSUB Ungenuegent

 Sehr_Gut:
 PRINT "Sehr gut",
Gut:
 PRINT "gut"
Befirdigend:
 PRINT "Befirdigend"
Ausreichend:
 PRINT "Ausreichend"
Mangelhaft:
 PRINT "Mangelhaft"
Ungenuegent:
 PRINT "Ungenuegent"

...

optimiere mal deinen Code -.-

Code:

CLS
Input "Dein Name"; Name$
Input "Die Max. Punktzahl"; max
Input "Die errieichte Punktzahl"; ist
Wert = max / ist
If Wert > 0.90 then Print "sehr gut"
If Wert < 0.9 and Wert > 0.8 then Print "gut"
If Wert < 0.8 and Wert > 0.75 then Print "Befriedigend" 
If Wert < 0.75 and Wert > 0.5 then Print "Ausreichend"
If wert < 0.5 and Wert > 0.3 then Print "Mangelhaft"
If Wert < 0.3 then Print "Ungenügend"

Ich hab jetzt die Werte von Dadie genommen, da ich die richtigen Schulbenotungswerte nicht mehr kenne.
Ich frage mich auch, wozu der Name sein soll?