Задано натуральное число n , вычислите сумму цифр - вопрос №1533596 от 123451175 13.05.2020 07:49

Question

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

123451175 · 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....