Jak obliczyć moduł dowolnej liczby rzeczywistej
SebaZ
Wystarczy zastosować tą prostą funkcję:
function ModulR(liczba : Real) : Real;
begin
if liczba >= 0 then
result := liczba
else
result := liczba * (-1);
end;
Wystarczy zastosować tą prostą funkcję:
function ModulR(liczba : Real) : Real;
begin
if liczba >= 0 then
result := liczba
else
result := liczba * (-1);
end;
nie no lol ? Zapytalem, ale nie bylo to meritum - bardziej zrozumiale ?
w zasadzie niczym :P Pokazuje jednak sposób jej działania :)
A w czym ta Twoja funkcja rózni się od
chyba slepy jestem :|
ale nie wazne :P
Nie chodzi o szybkość a o ciekawostke :)
nie mierzyłem, ale zawsze sądziłem, że mnożenie jest bardzo czasochłonne, a w Twoim porzykładzie jest ono wykonywane 2 razy plus jakies odejmowanie. W przeciwieństwie do mojego gdzie tylko dla liczby ujemnej jest mnożenie :)
No, ja zaproponuje moze nie lepsze, ale imho wymyslone bez zadnych inspiracji calkowicie przeze mnie rozwiazanie, moze komus przypadnie do gustu jako bonus (jak Myslicie ktore jest szybsze?):