PROCEDURE Gehe_bis_Wand;
BEGIN
WHILE not vorne_frei DO vor
END;
PROCEDURE Umgehe_die_Wand;
BEGIN
drehe_links;
WHILE not rechts_frei DO vor;
drehe_rechts;vor;drehe_rechts;
WHILE not vorne_frei DO vor;
drehe_links
END;
BEGIN
WHILE not vorne_frei DO vor
END;
PROCEDURE Umgehe_die_Wand;
BEGIN
drehe_links;
WHILE not rechts_frei DO vor;
drehe_rechts;vor;drehe_rechts;
WHILE not vorne_frei DO vor;
drehe_links
END;
Zuletzt geändert: Dienstag, 24. Mai 2011, 19:15