Eulersche Zahl e berechnen                               zurück

Dieses kleine Programm berechnet die Eulersche Zahl e über die unendliche Reihe:

e = 1 + 1 / 1 ! + 1 /2 ! + 1/3 !  + 1/4!  +  ...... + 1/n !

Hinter dem Befehl    e Berechnen  steht folgender Code:

Sub Befehl1_Click ()

• E = 1: F = 1
• For K = 1 To 100
  • F = F * K
  • E = E + 1 / F
  • Print E
• Next K

End Sub

Wenn man die Zahlen E und F mit dem Befehl Double doppelt genau dimensioniert , wird e trotzdem nicht genauer.

Link zur Eulerschen Zahl

Link zur Fakultätsberechnung  Symbol ! = Ausrufezeichen

Allgemeiner Code:

E = 1 : F = 1

For K = 1 to 10

• F = F*K
• E = E + 1/F
• Print E

Next K