Registriert seit: 17. Nov 2005
Ort: Hamburg
1.067 Beiträge
Delphi XE2 Professional
|
AW: Rechnungs hilfe
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....
|