Discussion :

[mteirek_m]

Dans le cadre de calcules stat je suis en train de travailler sur des factorielles.


En utilisant le type double de vb.net je peux faire 170!
Avec le type extended de delphi je peux aller au dela de 1000!


Est ce qu'il y a un moyen pour pouvoir faire des factorielles de 1000 ou plus ?? (méthodes ou types ou ??).

[Kelpan]

Bonjour,

Le type Decimal est peut être le type le plus approprié pour ce que tu veux faire.

[mteirek_m]

Bonjour,

Le type Decimal est peut être le type le plus approprié pour ce que tu veux faire.

Avec le type Decimal, je peux faire 26! et bug à 27!

[Kelpan]

Comment procèdes-tu exactement ? Tu peux en dire plus ?

[mteirek_m]

Comment procèdes-tu exactement ? Tu peux en dire plus ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
 
-------------------
 
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
        Dim tmpe, tmpa As Double
        If IsNumeric(Me.TextBox1.Text) = False Then Exit Sub
        tmpa = System.Convert.ToDouble(Me.TextBox1.Text)
        tmpe = Factorielle(tmpa)
        MsgBox(tmpe.ToString)
 
    End Sub
 
-------------------
 
    Function Factorielle(ByVal N As Long) As Double
        Dim i, Resultat As Double
        Resultat = 1
        For i = 1 To N
            Resultat = i * Resultat
        Next i
        Return Resultat
    End Function
 
-------------------

Avec ce code, je ne peux calculer les factorielles de nombre N > 170.

[Kelpan]

Le type decimal ne se comporte pas comme le type double en ce qui concerne les exposants... donc oui, en effet ça ne va pas.

A ma connaissance, il n'y a pas de type à virgule flottante plus grand que le decimal.

Tu peux essayer de passer par le type String qui te permettrait de na pas avoir de limite.
Je crois bien avoir déjà vu des algos pour additionner/soustraire/diviers et multiplier 2 valeurs de type String.