local a
a=1
while a<10001
do
local s,sum=2,1
while s<(a/2)
do
if (math.mod(a,s)==0)
then
sum=sum+s
end
s=s+1
end
if(sum==a)
then
io.write(a)
end
a=a+1
end
bG9jYWwgYQphPTEKd2hpbGUgYTwxMDAwMQpkbwoJbG9jYWwgcyxzdW09MiwxCgl3aGlsZSBzPChhLzIpCglkbwkKCQlpZiAobWF0aC5tb2QoYSxzKT09MCkKCQl0aGVuCgkJCXN1bT1zdW0rcwoJCWVuZAoJCXM9cysxCgllbmQJCglpZihzdW09PWEpCgl0aGVuCgkJaW8ud3JpdGUoYSkKCWVuZAkKCWE9YSsxCmVuZA==