Вопрос по информатике:
Ввести натуральное число N (не больше 2147483647). Определить сколько в нем знаков, вычислить сумму цифр числа и определить старшую цифру числа СРОЧНО НАДО!!!!!!!!
- 20.07.2018 05:32
- Информатика
- remove_red_eye 3902
- thumb_up 42
Ответы и объяснения 1
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.
- 21.07.2018 03:22
- thumb_up 47
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.