Вопрос по информатике:
Очень срочно нужно решить задачку на мове PascalABC
Вычислить количество цифр целого неотрицательного числа n.
Входные данные #1
12343
Выходные данные #1
5
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 13.09.2015 15:10
- Информатика
- remove_red_eye 12049
- thumb_up 38
Ответы и объяснения 2
begin
var a:=ReadInteger().ToString();
write(a.Count());
end.
- 14.09.2015 11:06
- thumb_up 23
n,k:integer;
begin
Write('n ='); Read(n);
n:=Abs(n); { от злобных буратинок с отрицательными числами }
if k=n then k:=1
else begin
k:=0;
while n>0 do begin
k:=k+1;
n:=n div 10
end
end;
Writeln('Количество цифр в числе равно ',k)
end.
Пример
n =435342134
Количество цифр в числе равно 9
- 15.09.2015 17:57
- thumb_up 45
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.