start
natural n,x,suma,cx,i,r
citeste n
pentru i <- 1,n executa
citeste x
copie_x = x
suma = 0
cat_timp x <> 0 executa
suma = suma + x % 10
x = x / 10
sfarsit_cat_timp
r = x % suma
cat_timp r<>0 executa
x <- suma
suma <- r
r <- x % suma
sfarsit_cat_timp
cmmdc <- suma
daca cmmdc = 1 atunci
scrie cx
sfarsit_daca
sfarsit_pentru
stop
eu zic sa iti schimbi numele ca poate vede profa
