citeste a, b, c
n<-(aMOD10)*100+(bMOD10)*10+cMOD10 //asta e numarul format din ultimele cifre
cat timp a>9 SAU b>9 SAU c>9 executa
daca a>9 atunci
a<-[a/10]
----se incheie daca
daca b>9 atunci
b<-[b/10]
----se incheie daca
daca c>9 atunci
c<-[c/10]
----se incheie daca
-----se incheie cat timp
//in acest moment fiecare numar a devenit prima sa cifra
nr<-a*100+b*10+c
scrie n, nr
