Thema: Delphi Rechnungs hilfe

Einzelnen Beitrag anzeigen

Amateurprofi

Registriert seit: 17. Nov 2005
Ort: Hamburg
1.067 Beiträge
 
Delphi XE2 Professional
 
#17

AW: Rechnungs hilfe

  Alt 10. Nov 2010, 10:32
Diese Rechenmethode/funktion nennt sich Fakultät und hier ein vorgekauter, runtergeschluckter und wieder erbrochener Code!
Kannst von mir aus gerne deinem Lehrer verweisen. Musst auch keine Credits vergeben!

Delphi-Quellcode:
function fakultät(const X: DWord): DWord;
asm
  xor ecx, ecx
  xchg eax, ecx
  @@_1:
    add eax, ecx
    loop @@_1
end;
Da hast du wohl was falsch verstanden.
Die Fakultät einer Zahl ist das Produkt aller Zahlen <= Zahl (nicht die Summe).
Gruß, Klaus
Die Titanic wurde von Profis gebaut,
die Arche Noah von einem Amateur.
... Und dieser Beitrag vom Amateurprofi....
  Mit Zitat antworten Zitat