Olle andern Probleme Fakultät vo n mit n>0 lossn se weida zleng in n ! = ( n − 1 ) ! ⋅ n {displaystyle n!=(n-1)!cdot n} De Umsetzung in Pascal: function Fakultaet(Eingabe: integer): integer; begin if Eingabe = 0 then result := 1 else result := Fakultaet(Eingabe - 1) * Eingabe; end; De Lösung is de kiarzeste und bracht koane zusätzlichn Variablen.