Написать программу определения суммы цифр числа и их количества, используя оператор цикла с постусловием. программа паскаль

Question

Информатика: Написать программу определения суммы цифр числа и их количества, используя оператор цикла с постусловием. программа паскаль

Ap4ik888 · Answer

Program gt;var n,q,s,k:integer;beginread(n);s:=0;k:=0;while n 0 dobeginq:=n mod 10;n:=n div 10;s:=s+q;k:=k+1;end;writeln(s, ,k);end....