start
citeste n
s=0
pentru d=1,n/2 
daca n mod d = 0 atunci
s=s+d
daca s=n atunci 
scrie "este numar perfect"
sfarsit