Nico

Aus ProgrammingWiki

Archivierte Version vom 2013-06-30T15:15:47+00:00. Aktuelle Version

Beispiele

=> Ich würde ja gerne mit "programmingwiki" arbeiten, jedoch mag mein Rechner einfach nichts ausführen. => zunächst Programmiersprache auswählen!

Addition'

function addition4(a,b,c,d:integer):integer;
begin
result:=a+b+c+d;
end;

writeln(inttostr(addition4(3,4,5,6)));

Beispiel Turtle (in Pascal)

Das nachfolgende Beispiel zeichnet einen farbigen Kreis.
Versuche durch leichte Anpassung '''* die Turtle sich nach links drehen zu lassen

die Anzahl der Kreissegmente zu verdoppeln ohne den Radius des Kreises zu vergrößern
zwei Kreise (links und rechts) hintereinander durch die Turtle zu zeichnen
dabei die Farben der Segmente zu verändern.

'''

var isUp:Boolean;
    i:integer;

selectCanvas(1);
canvas_clear(); // Zeichenfläche löschen
turtle_move(150,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;

Beispiel Turtle 2

Zeichne in die nächste Zeichenfläche entweder: * ein Quadrat * ein Dreieck * ein Haus oder * ein Haus mit Tür und Fenster

selectCanvas(2);
canvas_clear(); // Zeichenfläche löschen
turtle_move(200,100); // Turtle in die Mitte stellen

Nico

Beispiel Turtle (in Pascal)

Beispiel Turtle 2

Suche