MezData-Logo

Übungen zu Schleifen und Struktogrammen

E-Zähler

Erstellen Sie eine Funktion zaehle_e(s:Text):GZ mit Struktogramm die die 'e' 'E' in einem String s zählt.

Bankleitzahl prüfen

Erstellen Sie eine Funktion blz_pruef(s:Text):Boolean mit Struktogramm, die einen einfachen Plausibilitätscheck vornimmt, keine BLZ liegt vor wenn:

Anzahl der Stellen ist ungleich 8

Es sind Buchstaben enthalten

Prüfsumme mit Eingabestring

Erstellen Sie eine Funktion pruefs(s:Text):Boolean mit Struktogramm die entscheidet, ob die Quersumme einer Ziffernfolge durch 10 teilbar ist. Beispiele: pruefs("123") => false; pruefs("1234") => true da die Quersumme 10 durch 10 teilbar ist (Rest = 0). Da die Eingabe ein String ist müssen die Einzelnen Ziffernzeichen erst in Ziffernwerte umgewandelt werden. '5' ist nicht gleich 5!

Lösung..

Prüfsumme mit Eingabezahl

Erstellen Sie eine Funktion pruefs(n:GZ):Boolean mit Struktogramm die entscheidet, ob die Quersumme einer Ziffernfolge durch 10 teilbar ist. Beispiele: pruefs(123) => false; pruefs(1234) => true da die Quersumme 10 durch 10 teilbar ist (Rest = 0).

Spiegelprädikat (Palindrom-Prüfer)

Erstellen Sie eine Funktion palindrom(s:Text):Boolean mit Struktogramm die entscheidet ob ein Palindrom vorliegt: http://de.wikipedia.org/wiki/Palindrom

Funktion überprüft die Sortierung

Die Sortierung der Buchstaben eines Strings soll untersucht werden: "ABCFK" ist aufsteigend sortiert, "nix" ist unsortiert und "dca" ist absteigend.
Erstellen Sie eine Funktion sorttest(s:Text):GZ die 0 bei unsortiert, 1 bei aufsteigend und 2 bei absteigend ausgibt.