Zitat Zitat von DFYX
Mal ganz davon abgesehen, dass es in QBasic kein Select Case gibt.
Ich bin jetzt zu faul, um den "Wenn man keine Ahnung hat..."-Smilie rauszusuchen, aber...
Code:
CLS
INPUT "Dein Name"; Name$
INPUT "Die Max. Punktzahl"; max
INPUT "Die erreichte Punktzahl"; ist
Wert = max / ist
SELECT CASE Wert
        CASE IS > .9
                PRINT "sehr gut"
        CASE IS > .8
                PRINT "gut"
        CASE IS > .75
                PRINT "Befriedigend"
        CASE IS > .5
                PRINT "Ausreichend"
        CASE IS > .3
                PRINT "Mangelhaft"
        CASE ELSE
                PRINT "Ungen?gend"
END SELECT
PRINT Wert
btw, kann es sein, dass "max" und "ist" als Variablennamen vertauscht wurden? Wenn man z.B. eingibt, dass man 1 von 20 möglichen Punkten erreicht hat, spuckt das Programm ein "sehr gut" aus^^.