Ввести натуральное число N (не больше 2147483647). Определить сколько в нем знаков, вычислить сумму цифр числа и определить старшую цифру числа СРОЧНО НАДО!!!!!!!!
Program enot; Var i,n,k,a,s,m:integer; begin read(n); k:=0; s:=0; while n>0 do begin i:=a; a:= n mod 10; k:=k 1; s:=s a; n:=n div 10; if mend; write('summa = ',s,'; znakov = ',k,'; starsh = ',m); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
