Programiranje u BASIC-u/BKontrolne strukture /IF ... THEN ... ELSE: razlika između inačica
Izbrisani sadržaj Dodani sadržaj
Redak 37:
50 INPUT A
55 IF A<1 OR A> 20 THEN PRINT "Greška u unosu. Upišite broj između 1 i 20" : GOTO 50
60 IF A = B THEN PRINT "Pogodak ! "
ELSEIF A<B THEN PRINT "Prenisko, pokušaj opet!" : GOTO 50
ELSE PRINT "Previsoko, pokušaj opet!: GOTO 50
</SOURCE>
Skraćeniji program, jer u QBASICu je moguće sa INPUT ispisati rečenicu i poslje čekati za upis
Line 48 ⟶ 49:
50 IF A<1 OR A> 20 THEN PRINT "Greška u unosu. Upišite broj između 1 i 20" : GOTO 40
60 IF A = B THEN PRINT "Pogodak ! "
ELSEIF A<B THEN PRINT "
ELSE PRINT "Previsoko, pokušaj opet!: GOTO 40
</SOURCE>
| |||