Mit Σ rechnen

[Medium]

Das Summenzeichen so in dieser Form gibt es in Delphi nicht (in keiner Programmiersprache glaube ich). Du kannst entweder die zuvorgenannten fertigen Funktionen benutzen, am Ende ist eine Summenbildung aber auch nichts anderes als das Aufaddieren von N Werten in einer for-Schleife, was für deinen Fall, wo die Summanden wiederum aus einem Term bestehen, die bessere Variante ist:

Delphi-Quellcode:

var
  summe: Double;
  i, k, n: Integer;
begin
  summe := 0;
  for i := k to n do
    summe := summe + ((Fak(n)/(Fak(n-i) * Fak(i))) * Power(1/6, i) * Power(5/6, n-i);
end;

"Mit dem Summenzeichen arbeiten" (was auch immer das heissen soll) geht so direkt nicht.

Die Funktion Fak() gibt es imho nicht fertig in Delphi, aber unter dem Suchwort "Fakultät" lassen sich hier reichlich Beispiele dafür finden. Du wirst aber mit dieser Formel sehr schnell an die Grenzen der darstellbaren Zahlen gelangen, da die Zwischenergebnisse sehr groß werden können, je nach k und n. Da würde es dann nicht mehr viel mehr geben, als die Formel zu versuchen zu umzubauen, dass man die Riesenwerte in den Zwischenergebnissen los wird, oder eher schmutzig - eine Zahlen-Library nutzen, die entsprechend große Werte verarbeiten kann. Letzteres ist aber eher sehr unschön, und vor allem auch für Anfänger sicherlich nicht einfach zu durchblicken.