Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
14Dana14
30.08.2021 09:41 •
Информатика
Написать программу: дано натуральное число (не более 10 000), определить количество цифр в нем
Показать ответ
Ответ:
сорин8888
05.10.2020 12:58
Var i: byte;
begin
var n:=readinteger ('Введите n: ');
repeat
inc (i);
n:=n div 10;
until n=0;
write (i);
end.
0,0
(0 оценок)
Ответ:
pe4enel
05.10.2020 12:58
//PascalABC.NET
begin
write('Количество цифр: ', ReadString('Введите число:').Length)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
glazalmahfidbbw
24.04.2023 04:51
Как это сделать через питон???...
gubkina2003
03.07.2022 08:57
НУЖНО Задача 1. Определение, что такое переменная? Задача 2. Найти ошибки в имени переменной. 3salam= салам= S= salam3= Описать причину ошибки если такая есть. Задача...
planeta88
22.01.2022 05:15
ХЭЛП УМОЛЯЮ ХЭЛППППППП...
девочкаксюша
04.02.2020 19:01
Задание: Используя команды Поиск и Замена, убрать все лишние пробелы и специальные символы (разрыв строки, мягкий перенос, неразрывный пробел), пустые строки. Как это...
N1ke1N1kev1ch
19.08.2020 18:24
Обчислень ккд теплової машини , що для виконня корисної роботи 250 мдж витрачає 0,87 гдж енергії....
gamerXpro
19.08.2020 18:24
Укозать особенности строения движения и жизнедеятельности анебы...
Сашечка11
19.08.2020 18:24
Have got/has got complete the sentences 1. she long hair. 2. we short hair. 3. you big eyes. 4. my dog big ears. 5. they black hair. negative 1. she long hair. 2. we...
raizat2004
19.08.2020 18:24
Вам нужно умножить некоторое большое число x на 27. у вас есть калькулятор, но на калькуляторе сломались все кнопки операций, кроме сложения. поэтому вы можете только...
Вазген228
19.08.2020 18:24
Найдите наименьшее значение функции у=х^2-6х+4...
Dagrf
19.08.2020 18:24
Соотнесите предложение и его тип. (безличное, определенно-личное,назывное,неопределенно -личное,обобщенно-личное) майский полдень. желаю всего хорошего. ему стало стыдно...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var n:=readinteger ('Введите n: ');
repeat
inc (i);
n:=n div 10;
until n=0;
write (i);
end.
begin
write('Количество цифр: ', ReadString('Введите число:').Length)
end.