Programmierung

Aus ProgrammingWiki

Archivierte Version vom 2011-01-19T13:38:07+00:00. Aktuelle Version

Vergleich von Schleifen:

zählgesteuerte Schleife

Addiere mit Hilfe einer Zählschleife die Zahlen 1 bis 10.

function zahl:integer;
var i,su:real;
begin
su:=0;
For i:=1 to 10 do
    su:=su+i;
result:=su;
end;

writeln('Die Summe der Zahlen 1 bis 10 beträgt: '+su '.');

Wandle die Repeat until-Schleife in eine While Do-Schleife um.

function dick:real;
var d, l:real;
begin
//hier vervollständigen
end;

writeln('Die Rolle ist: '+dick()+'m dick.');