Standardni algoritmi

10. Zbroj znamenki unesenog broja

ulaz (broj);
zbroj:=0;
dok je broj<>0 činiti
{

   zadnja:=broj mod 10;
   zbroj:=zbroj+zadnja;
   broj:=broj div 10;
}
izlaz (zbroj);