Hi alle zusammen
Ich soll wieder ein Programm schreiben, dass den BMI berechnet, mit einer Fuß-Schleife. Gefordet waren auch: Geschlecht, Name, u.s.w....dennoch habe ich hier Probleme weil er mir immer wieder sagt das ich kein DO Befehl eingegeben habe und so der LOOP nicht verarbeitet wird...vll findet ihr de fehler.
CODE:
REM BMI_Berechnung
DIM gewicht AS DOUBLE
DIM groesse AS DOUBLE
DIM vorname AS SINGLE
DIM nachname AS SINGLE
DIM geschlecht AS SINGLE
DIM bmi AS INTEGER
DO
CLS
PRINT "BMI Berechnen"
PRINT
PRINT "Dieses Programm berechnet ihren Body Mas Index aus und sagt Ihnen ob die Unter-/Normal-/ oder šbergewichtig sind!"
PRINT
INPUT "Vorname:"; vorname
INPUT "Nachname:"; nachname
INPUT "Geschlecht Frau oder Mann:"; geschlecht
INPUT "Geben Sie Ihr Gewicht in KG an:"; gewicht
PRINT
INPUT "Nun gegeben Sie Ihre GrӇe in METER an:"; groesse
bmi = gewicht / groesse ^ 2
SELECT CASE bmi
CASE IS > 20 < 25
PRINT "Sehr geehrte"; geschlecht; vorname; nachname; "Ihr BMI ist:"; bmi; "Somit haben sie normal Gewicht."
CASE IS > 25 < 30
PRINT "Sehr geehrte"; geschlecht; vorname; nachname; "Ihr BMI ist:"; bmi; "Somit haben sie leichtes šbergewicht."
CASE IS > 30 < 40
PRINT "Sehr geehrte"; geschlecht; vorname; nachname; "Ihr BMI ist:"; bmi; "Somit haben sie mittleres šbergewicht."
CASE IS > 40
PRINT "Sehr geehrte"; geschlecht; vorname; nachname; "Ihr BMI ist:"; bmi; "Somit haben sie starkes šbergewicht."
INPUT "Nochmal mit j"; auswahl$
auswahl$ = UCASE$(auswahl$)
LOOP WHILE auswahl$ = "J"
PRINT "Programmende!!"
END
____________________________________________-
Das Problem hängt irgendwo zwischen dem DO un dem LOOP WHILE. Hoffe ihr könnt mir sagen wo er ist.. :omg::wave::wave2: ( voll coole smilies xD )