Tìm các số hoàn hảo không quá n được nhập từ bàn phím pascal (số hoàn hảo là số có tổng các ước của nó bằng chính nó)

tìm các số hoàn hảo không quá n được nhập từ bàn phím pascal(số hoàn hảo là số có tổng các ước của nó bằng chính nó)
VD:
       ước của 6: 1,2,3
           1+2+3=6
giúp mình với