for i=1,10000
do
sum=0
for j=1,i-1
do
if(i%j==0) then
sum+=j end
end
if(sum==i)
then
print i
end
end
Zm9yIGk9MSwxMDAwMApkbwogICBzdW09MAogICBmb3Igaj0xLGktMQogICBkbyAgIAogICAgICBpZihpJWo9PTApIHRoZW4KICAgICAgICAgc3VtKz1qIGVuZAogICBlbmQKICAgaWYoc3VtPT1pKQogICB0aGVuCiAgICAgcHJpbnQgaQogICBlbmQKZW5k