local a
a=1
while a<10001
do
local s,sum=2,1
while s<(a/2)
do
local x=a/s
if ((x*s)==a)
then
sum=sum+s
end
s=s+1
end
if(sum==a)
then
io.write(a)
end
a=a+1
end
bG9jYWwgYQphPTEKd2hpbGUgYTwxMDAwMQpkbwoJbG9jYWwgcyxzdW09MiwxCgl3aGlsZSBzPChhLzIpCglkbwoJCWxvY2FsIHg9YS9zCgkJaWYgKCh4KnMpPT1hKQoJCXRoZW4KCQkJc3VtPXN1bStzCgkJZW5kCgkJcz1zKzEKCWVuZAkKCWlmKHN1bT09YSkKCXRoZW4KCQlpby53cml0ZShhKQoJZW5kCQoJYT1hKzEKZW5k