FSR - QBasic Seite 16

AG Informatik

In einigen vorherigen Programmen sind Daten direkt mit dem INPUT-Befehl in den Computer eingegeben worden. Manchmal wäre das sehr mühsam, vor allem dann, wenn bei jedem Programmlauf viele Daten sich wiederholen. Mit den Befehlen READ, DATA und RESTORE kann man viel Zeit sparen.

Starte gegebenenfalls QBasic und gib das folgende Programm ein.
```
       REM Read1
       CLS
       READ a,b,c
       PRINT a,b,c
       END
       DATA 10,20,30
```
Auf den READ-Befehl folgen eine Reihe von Variablen, die durch Kommas getrennt sind. Der Computer holt sich die Werte für diese Variablen aus der oder den DATA-Zeile(n).

Mehrere Variablen-Werte lassen sich mit Hilfe von Schleifen recht einfach einlesen, wie das folgende Beispiel zeigt.

       REM Read2
       CLS
       FOR n=1 TO 6
         READ a
         PRINT a,
       NEXT n
       END
       DATA 2,4,6,8,10,12

Auch Zeichenkettenvariablen (Strings) können mit der READ- Anweisung gelesen werden.

       REM Read3
       CLS
       READ d$
       PRINT "Das Datum ist "; d$
       END
       DATA "1. Juni 1982"

Die erste READ-Anweisung liest normalerweise den Wert der ersten DATA-Zeile im Programm ein. Sollen Werte in einer bestimmte DATA-Zeile gelesen werden, kann man den RESTORE-Befehl verwenden.

       REM Read4
       CLS
       RESTORE Anfang
       READ d$
       DATA "großartig"
       PRINT "Du bist als Programmierer "; d$
       END
       Anfang:
       DATA "erbärmlich"