Задано натуральное число n , вычислите сумму цифр числа используя цикл while

Question

Информатика: Задано натуральное число n , вычислите сумму цифр числа используя цикл while

Гелик2132 · Answer

var sum,n:int64;begin  write( Vvedite chislo: );  readln(n);   while(n 0) do begin    sum:=sum+(n mod 10);    n:=n div 10;   end;  writeln(sum);  readln;end....

Задано натуральное число n , вычислите сумму цифр числа используя цикл while

Популярные вопросы