Forum: Sonstige Fragen zu Delphi
Delphi
by Amateurprofi,
22. Apr 2010
Siehst du den wirklich nicht ?
Die Fragestellung war, die Summe aller ungeraden Zahlen im Bereich 1 bis n zu bilden.
Du sagst "Das Ergebnis ist schlicht und einfach n²."
Aber das n, das nur einfach quadriert werden muß ist etwas anderes als das n aus der Aufgabe.
Wenn zum Beispiel die ungeraden Zahlen aus dem Bereich 1 bis 100 addiert werden sollen,
dann ist das n aus der Aufgabe = 100....
Forum: Sonstige Fragen zu Delphi
Delphi
by Amateurprofi,
22. Apr 2010
So einfach ist es dann doch wieder nicht.
Es soll die Summe der ungeraden Zahlen im Bereich 1 bis n gebildet werden.
Die Formel aus Wiki bildet die Summe der ersten n ungeraden Zahlen.
Forum: Sonstige Fragen zu Delphi
Delphi
by Amateurprofi,
21. Apr 2010
// Summe der ungeraden Zahlen im Bereich 1 bis n
// Funktioniert bis n=46340, bei höheren Werten Integer-Overflow
FUNCTION SumOfOdd(n:integer):integer;
begin
result:=Sqr(n - 1 or 1 + 1) div 4
end;
// Anzahl der geraden Zahlen ab 2, die als Summe n erreicht (oder überschreitet)
// Funktioniert bis n=536870911, bei höheren Werten Integer-Overflow
FUNCTION CountOfEven(n:integer):integer;