PMG/Profil 10 1314/Turtle 3
Aus ProgrammingWiki
Wiki-Quelltext dieser Seite.
<language>Pascal</language>
Zum Abschluss sollt Ihr die Turtle nochmal zeichnen lassen...
In der ersten Zeichenfläche soll die Turtle folgendes ausführen
* 50 "Schritte" vorwärts, Farbe rot
* Drehung 45° rechts, 30 Schritte, Farbe grün
* Drehung 180°, 30 Schritte
* Drehung 90° rechts, 30 Schritte
<code id="525d088546b98">
var isUp:Boolean;
i:integer;
</code>
<run id="525d088546c17">
selectCanvas(1);
canvas_clear(); // Zeichenfläche löschen
turtle_move(300,100); // Turtle in die Mitte stellen
isUp := false;
// hierhin kommt Dein Programmtext
end;
</run>
<canvas w=500 h=500></canvas>
In der zweiten Zeichenfläche soll die Turtle folgendes ausführen
* ein Achteck zeichnen
* bei Umsetzung Zählschleife verwenden
<code id="525d0a0b459fb">
var isUp:Boolean;
i:integer;
</code>
<run id="525d0a0b45b0c">
selectCanvas(2);
canvas_clear(); // Zeichenfläche löschen
turtle_move(300,100); // Turtle in die Mitte stellen
isUp := false;
// hierhin kommt Dein Programmtext
end;
</run>
<canvas w=500 h=500></canvas>
In der dritten (und letzten) Zeichenfläche soll die Turtle folgendes ausführen
* zeichnet gleichschenkliges Dreieck
* dreht Dreieck so, dass Viereck mit vier inneren Dreiecken entsteht
* (siehe Bild)
<code id="525d0a0b45a7d">
var isUp:Boolean;
i:integer;
</code>
<run id="525d0a0b45b87">
selectCanvas(3);
canvas_clear(); // Zeichenfläche löschen
turtle_move(300,100); // Turtle in die Mitte stellen
isUp := false;
// hierhin kommt Dein Programmtext
end;
</run>
<canvas w=700 h=700></canvas>