Jeder in seiner Lieblingssprache

[squeaker]

2 Klassen von Lösungen

Man sollte eigentlich 2 Klassen von Lösungen unterscheiden:

die genauen (z.B. die Java mit BigInteger, Smalltalk, ...) und die Näherungen (die sind einfach)

 

[psycomantis]

In C++ als rekursive Funktion:

#include <iostream.h>

 double Fakultaet(int n);
 
 void main(void)
 {
	 cout<<Fakultaet(100);
 }

 double Fakultaet(int n)
 {
	 if(n==0)
	 {
		return 1;
	 }
	 else
	 {
	 return (n*Fakultaet(n-1));
	 }
 }

 

[RedWing]

Also hier ein Beispiel in Gofer (funktional):

fak::Int->Double --Definitionsbereich festlegen --

fak n = if( n == 0) then 1.0 else primToDouble(n) * fak n-1

Aufruf im Intepreter:

fak 100

Gruß

RedWing

 

[JohannesR]

Nochmal PHP, rekursiv.

<?php
function fac($in)
{
    if ($in < 2) {
        return $in;
    }
    return ($in * fac($in - 1));
}

print fac(100);
?>

 

[Thomas Darimont]

Hallo!

Johannes Röttger .. nach deinem Programm ist 0! -> 0 ...
Gruß Tom

 

[JoKne]

keiner Visual Basic?

Dann versuch ich das mal:

Private Function Fakultät(ByVal n)   
   If n <= 1 Then   
       Fakultät = 1  
   Else   
      Fakultät = n*Fakultät(n-1)  
   End if  
End function    
 
Debug.Print Fakultät(100)

Hoffe mal das ich das bald auch in c# schaffe

 

[Thomas Darimont]

Hallo!

Diese Lösung ist jedoch ungenau... wenn du eine genau Lösung mit Visual Basic hinbekommen willst guckstu hier: http://www.rhirte.de/vb/ganzzahl.htm#fak2

Gruß Tom

 

[JoKne]

Danke für den Link!

und wieder gilt "alles ist relativ " ^^

 

[Johannes Postler]

Original geschrieben von Thomas Darimont
Hallo!

Johannes .. nach deinem Programm ist 0! -> 0 ...
Gruß Tom

Ähm, welcher Johannes?

 

[DrSoong]

Nebenbei, als Ergänzung von Leevers Post: PHP kanns auch genauer:

<?php
$n;
$m = 1;
   do {
     $n++;
     $m = bcmul($n, $m);
   } while($n<100);
echo $m;
?>

Das Ergebnis steht schon im 4 Post (von Thomas Darimont).


Der Doc!