Turtle 2

Aus ProgrammingWiki

Archivierte Version vom 2011-04-11T18:37:56+00:00. Aktuelle Version

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.

var isUp:Boolean;
    i:integer;

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;

Turtle 2

Suche