Răspuns:
Citeste y; (numar intreg)
|cat timp(y<>0) executa
| c <- y%10;
| y <- [y/10];
| S <- S+c;
-----sfarsit de cat timp
|daca(y=0) atunci
| Afiseaza "y este egal cu zero, deci suma cifrelor este 0"
----sfarsit de daca
Programul a fost verificat in CodeBlox: Calculeaza suma cifrelor numarului 1112223, care este 12.