SMALLTALK K1ex127-.45ex51275ahler/Bothner

68 4 Erweiterung des Lösungsplans
verarbeitet und daher zunächst die Methode “bereitstellenWerte” ausgeführt. Hieraus
resultiert als Ergebnis-Objekt ein Bag, dessen Bestandteile die erfaßten Punktwerte
der Jahrgangsstufe 11 sind. Dieses Ergebnis-Objekt ist das Empfänger-Objekt
der unären Message “size”. Das aus dieser Message resultierende Ergebnis-Objekt
ist gleich der Anzahl der erfaßten Punktwerte. Diese Zahl stellt das Argument der
binären Message “/” dar, die dem Empfänger-Objekt “summe” zugestellt wird.
Durch die Ausführung der Methode “/” erfolgt eine Division, so daß der resultierende
Quotient der Variablen “durchschnittswert” zugeordnet wird.
Umsetzung des Lösungsplans
Um den Durchschnittswert für die Punktwerte der Jahrgangsstufe 11 zu ermitteln,
können wir das in Abbildung 4.7 angegebene Struktogramm wie folgt umsetzen:
|summe durchschnittswert|
summe := 0.
WerteErfassung11 bereitstellenWerte
do: [:einObjekt|summe := summe + einObjekt asInteger].
durchschnittswert := summe /
(WerteErfassung11 bereitstellenWerte size)
Lassen wir diese Anforderungen – unter Einsatz der Menü-Option “‘Show It” des
Menüs “Smalltalk” – ausführen, so wird der Durchschnittswert der Punktwerte der
Jahrgangsstufe 11 im Workspace-Fenster angezeigt.
Indem wir “WerteErfassung11” durch “WerteErfassung12” ersetzen, läßt sich der
Durchschnittswert für die innerhalb der Instanz “WerteErfassung12” gesammelten
Punktwerte der Jahrgangsstufe 12 errechnen.
Soll der Durchschnittswert im Transcript-Fenster angezeigt werden, so sind die angegebenen
Anforderungen wie folgt zu ergänzen:
Transcript cr.
Transcript show: ’Der Durchschnittswert ist: ’.
Transcript show: durchschnittswert asFloat printString
Hinweis: In diesem Fall ist zu beachten, daß – beim Einsatz von “Show It” – im Workspace
“a MDITranscript” als Ergebnis-Objekt der letzten Anforderung mit der Message “show:”
angezeigt wird.
Durch diese Anforderungen wird festgelegt, daß der ermittelte Durchschnittswert im
Transcript-Fenster hinter dem Text “Der Durchschnittswert ist: ” angezeigt werden
soll.
Damit der Durchschnittswert als Dezimalzahl ausgegeben wird, setzen wir die Basis-
Methode “asFloat” ein. Es gilt nämlich:
ˆ “asFloat”:
Die unäre Message “asFloat” läßt sich einer beliebigen Zahl zustellen. Als
Ergebnis-Objekt resultiert eine Dezimalzahl.
Hinweis: Zum Beispiel liefert die Anforderung “10 / 4 asFloat” die Zahl “2.5”
als Ergebnis-Objekt. Dagegen führt z.B. “10 / 4” zum Ergebnis-Objekt “5 / 2”,