Werbung
ZEICHEN UNO STRINGS
LÄNGE VON
STRINGS
PROGRAMM-
AUFBAU
20
Bei SuperBASIC kann die Länge oder Anzahl von Zeichen eines Strings problemlos
ermittelt werden. So geben Sie beispielsweise einfach:
PRINT LEN(wochentag$)
ein. Enthält das Ablagefach, wochentag$, ERSTER, so wird die Zahl 6 angezeigt. Die
Auswirkungen werden anhand eines einfachen Programms deutlich:
NEW.II
100 LET wochentag$
110 PRINT LEN(wochentag$)
.11
RUN
Auf dem Bildschirm muß:
6
angezeigt werden. LEN ist ein SuperBASIC-Befehl.
Bei einer anderen Methode, mit der dasselbe Ergebnis erzielt wird, wird sowohl ein
Ablagefach für einen String als auch ein Ablagefach für eine Zahl benutzt.
NEW.II
100 LET wochentag$
110 LET Lang
LEN(wochentag$)
=
.11
120 PRINT Lang
.11
RUN
Auf dem Bildschirm muß:
6
wie vorher angezeigt werden. Die beiden internen Ablagefächer enthalten folgende
Werte:
WOChentag$!ERSTERj
Nun wollen wir uns wieder dem Problem der durchschnittlichen
zuwenden.
Schreiben Sie ein Programm, um die durchschnittliche
Wörter zu ermitteln:
ERSTER APRIL 1985
Sobald die Probleme über das Normalmaß hinausgehen, wird empfohlen, den Pro-
grammaufbau zu skizzieren, bevor das Programm selbst geschrieben wird.
1. Die drei Wörterwerden in Ablagefächern gespeichert.
2. Die Länge der Wörter wird berechnet und gespeichert.
3. Der Durchschnittswert wird berechnet.
4. Das Ergebnis wird berechnet.
NEW.II
100 LET wochentag$
110 LET monat$
120 LET jahr$
=
130 LET Lang1
=
=
140 LET Lang2
150 LET Lang3 = LEN(jahr$)
160 LET summe
=
170 LET durchschni
180 PRINT durchschni
.11
RUN
Das Symbol!
bedeutet dividiert durch. Das Ergebnis der Ausführung dieses Pro-
gramms ist einfach die folgende Ausgabe:
5
"11
.111
"ERSTER"
=
.11
.11
"ERSTER"
=
"11
[J
lang
.11
"ERSTER"
=
.11
"APRIL"
=
"1985"
"11
.11
LEN(wochentag$)
"11
LEN(monat$)
"11
+
+
Lang1
Lang2
Lang3"
tt
summe/3.1
=
.11
tt
Länge von Wörtern
Länge der drei folgenden
11
3/85
c
(
Werbung
Kapitel
