PMG/Profil nawi 9 1011/Turtle 2

Wiki-Quelltext dieser Seite.

<language>Pascal</language>
Gegeben ist folgendes Struktogramm.

Die Turtle soll sich so wie in dieser Handlungsanweisung vorgegeben bewegen.
Dazu ist das vorgegebene Programm von Dir entsprechend zu ergänzen.


<code id="4da34a83cd5d1">
var isUp:Boolean;
    i:integer;
</code>

<run id="4da34a83cd650">
selectCanvas(1);
canvas_clear(); // Zeichenfläche löschen
turtle_move(200,100); // Turtle in die Mitte stellen

isUp := false;

for i := 0 to 17 do begin
 turtle_penColor(i*10+50,0,250-10*i);  
 turtle_penWidth(10);
 turtle_forward(20);  
 turtle_right(20); 
 isUp := not isUp; 
 if isUp then turtle_penUp() else turtle_penDown();
end;
</run>

<canvas w=1000></canvas>