Prozeduren mit Zeichenketten

Weitere Selektoren für Zeichenketten

In Anlehnung an die Selektoren car / cdr für Listen sollen zunächst analoge Selektoren für Zeichenketten entwickelt werden. Dabei ist genau auf deren Definitions- und Wertebereich zu achten. Man spricht in diesem Zusammenhang von der Signatur einer Prozedur:

Beispiel:

string-car: string \longmapsto char

	(define string-car (lambda (zk) (string-ref zk 0))) (string-car "Informatik")ausführen
	(define string-cdr (lambda (zk) (substring zk 1 (string-length zk)))) (string-cdr "Informatik")ausführen
	(define string-last (lambda (zk) (string-ref zk (- (string-length zk) 1)))) (string-last "Informatik")ausführen

Generierung von Benutzernamen und Kennwörtern

Beispiel für eine Netzwerk-Anmeldung

Der Administrator eines Computernetzwerkes möchte die Festlegung von Benutzernamen für eine größere Anzahl von Benutzern automatisieren. Dazu legt er fest:
Das Kennwort setzt sich aus den ersten drei Buchstaben des Vornamens und dem kompletten Nachnamen zusammen. Diese Zeichenkette wird grundsätzlich klein geschrieben.

Beispiel:

> (benutzername "Beatrix "Berger")
--> beaberger

Implementieren Sie eine entsprechende Prozedur.

Mein individuelles Kfz-Kennzeichen

Aktuelles deutsches Kfz-Kennzeichen aus dem Landkreis Rastatt (Baden-Württemberg)

Viele Autofahrer legen goßen Wert auf ein ganz individuelles polizeiliches Kennzeichen an ihrem Fahrzeug. Häufig soll es die Anfangsbuchstaben des Vor- und Nachnamens sowie den Geburtstag und den Geburtsmonat beinhalten.

Schreiben Sie eine Prozedur, die die persönliche Daten entgegennimmt und das gewünschte Kennzeichen als Zeichenkette zurückgibt.

Beispiel:

> (kennzeichen "Romy" "Berger" '(14 02 1988))
--> "GR-RB 142"