Herunterladen Diese Seite drucken

Sinclair QL Benutzerhandbuch Seite 97

Werbung

TABELLEN
ZWEI-
DIMENSIONALE
TABELLEN
76
220
LET wohnung$ (1)
230
LET wohnung$ (3)
240 END DEFi ne
250 OATA "Tom",
260 OATA "Bert",
"Di rk"
Ausgabe (Zeile 130)
1 Tom
2 KarL
3 Hara ld
4 Jan
5 Achim
6 Bert
7 Jochen
8 Walter
9 Werner
10 Di rk
Gelegentlich ergeben sich aus der Natur eines Problems zwei Dimensionen, wie
beispielsweise drei Stockwerke mit zehn Wohnungen anstatt nur einem Stockwerk
mit 30 Wohnungen.
Angenommen, 20 oder mehr Golfer brauchen Wohnungen und es ist ein Block mit
30 Wohnungen auf drei Stockwerken mit jeweils zehn Wohnungen vorhanden. Die-
ser Block würde realistischerweise mit einer zweidimensionalen Tabelle dargestellt.
Sie können sich die 30 Variablen wie folgt vorstellen:
D D D::~::i~~~t:~k~~:::
wOhnung$(2,O)
wOhnung$(2,1)
D D:::E:S:~~:o:~(:)::~
wohnung$(1,0)
wOhnung$(1, 1)
CJ
D D D~~~~d~::C::ß~~~
wohnung$(O,O)
wOhnung$(O,1)
Bei DATA-Anweisungen
mit 30 Namen könnten die Namen folgendermaßen in die
Wohnungen gesetzt werden:
120 FOR stock
0 TO 2
=
130
FOR zahl
0 TO 9
=
140
READ wohnung$(stock,zahL)
150
ENO FOR zah l
160 ENO FOR stock
Außerdem wird eine DIM-Anweisung benötigt:
20 DIM wohnung$(2,9,
Mit dieser Anweisung wird angegeben, daß der erste Index von 0 bis 2 (Stockwerk-
nummer) und der zweite Index von 0 bis 9 (Wohnungsnummer) gehen kann. Mit der
dritten Zahl wird die Höchstzahl von Zeichen in jedem Tabellenelement angegeben.
Nun fügen wir einen Programmteil hinzu, der ausdruckt, daß die Golfer in den Woh-
nungen wohnen. Um Platz zu sparen, werden Buchstaben benutzt.
100 REMark 30 Golfspieler
110 DIM wohnung$(2,9,7)
120 FOR stock
0 TO 2
=
130
FOR zahL
0 TO 9
=
140
READwohnung$(stock,zahl)
150
END FOR zah l
160 END FOR stock
170 REMark Ende der
wohnung$ (3)
=
momentan$
=
"KarL",
"Harald",
"Jochen",
"WaLter",
Ausgabe (Zeile 150)
1 HaraLd
2 Kar l
3 Tom
4 Jan
5 Achim
6 Bert
7 Jochen
8 WaLter
9 Werner
10 Di rk
wOhnung$(2,2)-
- - - - - - - - - - - - - wOhnung$(2,9)
wohnung$(1 ,2)- - - - - - - - - - - - - - wOhnung$(1,9)
wohnung$(O,2)-
- - - - - - - - - -- - - wOhnung$(0,9)
7)
: REMark Gol fspieler
Eingabe
"Jan",
"Achim"
"Werner",
geht
rein
3/85
(

Werbung

loading

Verwandte Produkte für Sinclair QL