👤
Mangircatalina1
a fost răspuns

Scrieti un program pascal care calculeaza suma cifrelor unui numar natural de 4 cifre

Răspuns :

Balac
n=numarul de 4 cifre
begin
    s:=0;
    While(n<>0) do
       begin
           c:=n mod 10;
           s:=s+c;
           n:=n div 10;
       end;
  writeln(s);
end.

Alte intrebari