Anonymous user
Factors of an integer: Difference between revisions
Lingo added
m (→{{header|AppleScript}}: (updated primitives)) |
(Lingo added) |
||
Line 2,289:
Program complete.
</pre>
=={{header|Lingo}}==
<lang lingo>on factors(n)
res = []
repeat with i = 1 to n/2
if n mod i = 0 then res.add(i)
end repeat
res.add(n)
return res
end</lang>
<lang lingo>put factors(45)
-- [1, 3, 5, 9, 15, 45]
put factors(53)
-- [1, 53]
put factors(64)
-- [1, 2, 4, 8, 16, 32, 64]</lang>
=={{header|Logo}}==
| |||