|
Maze.d |
DEFINITION MODULE Maze; CONST space = " "; (* freier Raum *) walk = "*"; (* Wegemarkierung *) PROCEDURE MinimalSize() : CARDINAL; PROCEDURE MaximalSize() : CARDINAL; PROCEDURE Init(lines, columns: CARDINAL); PROCEDURE Lines() : CARDINAL; PROCEDURE Columns() : CARDINAL; PROCEDURE Get(line, column: CARDINAL; VAR ch: CHAR); PROCEDURE Set(line, column: CARDINAL; ch: CHAR); END Maze. |
Um ein funktionierendes Beispiel für die Modularisierung
zu sehen, steht eine modularisierte Fassung der Musterlösung
zur 13. Aufgabe zur Verfügung (Durchlaufen eines Labyrinths).
| |
Die Modularisierung ist bei diesem Beispiel noch weiter
vorangeschritten: Auch die Ein- und Ausgabe und das Finden
eines Weges wurden herausgetrennt.
|
Copyright © 1999 Andreas Borchert, in HTML konvertiert am 04.02.1999 |