Arithmetic derivative: Difference between revisions
Added Easylang
(Added XPL0 example.) |
(Added Easylang) |
||
Line 313:
D(10^20) / 7 = 200000000000000000000
</pre>
=={{header|EasyLang}}==
{{trans|Lua}}
<syntaxhighlight>
func lagarias n .
if n < 0
return -lagarias -n
.
if n = 0 or n = 1
return 0
.
f = 2
while n mod f <> 0
f += 1
.
q = n / f
if q = 1
return 1
.
return q * lagarias f + f * lagarias q
.
for n = -99 to 100
write lagarias n & " "
.
</syntaxhighlight>
=={{header|Factor}}==
|