While logische Bedingung
Anweisungen EndWhile |
Nachdem der Benutzer eine natürliche Zahl eingegeben hat, soll das Programm die Ziffernsumme berechnen und ausgeben. |
Zum Berechnen der Ziffernsumme muss
die Zahl fortwährend ganzzahlig durch 10 dividiert werden bis der
Quotient Null ergibt, wobei man die dabei entstehenden Reste addiert. Benennen
wir die Variable, die die Ziffernsumme enthalten soll mit summe,
den jeweils auftretenden Rest mit rest und die natürliche Zahl
mit n, sieht die While-Schleife folgendermaßen aus:
While n > 0
mod(n, 10) + summe ®summe iPart(n / 10) ® n EndWhile |
Es ist zu beachten, dass die
Variable summe vor ihrer Verwendung in der Schleife initialisiert;
d.h. in diesem Fall auf Null gesetzt werden muss, da es ansonsten zu folgender
Fehlermeldung kommt:
|
[Lösungsvorschlag] |
While
Anweisungen While Anweisungen EndWhile Anweisungen EndWhile |
[Lösungsvorschlag] |
|