Für Schule Niki

program aufg3b;
procedure U;
begin
vor;
gib_ab;
vor;
gib_ab;
vor;
gib_ab;
vor;
gib_ab;
vor;
gib_ab;
end;

procedure uu;
begin
drehe_links;
vor;
gib_ab;
vor;
gib_ab;
drehe_links;
end;

procedure weg;
begin
drehe_links;
vor;
vor;
vor;
vor;
vor;
drehe_links;
drehe_links;
drehe_links;
vor;
vor;
vor;
vor;
vor;
drehe_links;
drehe_links;
drehe_links;
end;

BEGIN
Arbeitsfeld(aufg3b);
weg;
U;
uu;
U;
END.

program aufg3d;
procedure mauer;
begin
vor;
nimm_auf;
drehe_links;
drehe_links;
drehe_links;
vor;
vor;
nimm_auf;
vor;
vor;
nimm_auf;
vor;
vor;
nimm_auf;
vor;
vor;
vor;
drehe_links;
vor;
nimm_auf;
drehe_links;
vor;
vor;
nimm_auf;
vor;
vor;
nimm_auf;
vor;
vor;
nimm_auf;
vor;
vor;
nimm_auf;
vor;
drehe_links;
drehe_links;
drehe_links;
end;

procedure gehe;
begin
vor;
vor;
end;

procedure gehen;
begin
vor; vor; vor; vor;
end;

BEGIN
Arbeitsfeld(aufg3d);
mauer;
gehe;
mauer;
gehen;
mauer;
END.