Seite Christiane

Aus ProgrammingWiki

Archivierte Version vom 2011-10-11T14:37:40+00:00. Aktuelle Version

Hier wird die Fakultät einer ganzen Zahl berechnet

function fak_rek(n:integer):integer;
begin
 if n=0 then result:=1 
 else result:=n*fak_rek(n-1);
end;