19 lines
151 B
Text
19 lines
151 B
Text
do
|
|
|
|
input "enter an integer", n
|
|
|
|
loop n = 0
|
|
|
|
let a = abs(n)
|
|
|
|
for i = 1 to int(a / 2)
|
|
|
|
if a = int(a / i) * i then
|
|
|
|
print i
|
|
|
|
endif
|
|
|
|
next i
|
|
|
|
print a
|