Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
радуга52
11.08.2022 10:35 •
Информатика
Написать программу: дано натуральное число (не более 10 000), определить количество цифр в нем
Показать ответ
Ответ:
asura3
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 оценок)
Ответ:
skalapendra1212
05.10.2020 12:58
//PascalABC.NET
begin
write('Количество цифр: ', ReadString('Введите число:').Length)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
vasdehinskil
25.09.2022 18:44
Как задается адрес ячейки в программе Excel?...
Dianaasdfg
11.04.2021 00:02
Хто вміє працювати в Автокад2007? Треба зробити практичну , хто до ?...
Василий300
24.01.2022 17:54
Задание № 5. 1. Запустить текстовый редактор Word командой [Программы-Microsoft Word].2. Ввести команду [Вставка-Символ...]. На экране появится диалоговая панель Символ Центральную...
aza54
04.11.2020 21:41
Каждая страница учебника содержит 20 строк по 30 символов в каждой строке. Всего страниц в книге 50. Определите информационный объём учебника в Байтах * О 30000 байт...
moskaliov
26.09.2022 03:54
Создать такой код чтоб ввести числа A и B. Определить, является ли число a делителем числа B...
Nilufar777
30.10.2021 03:33
Составить в молекулярном и ионном виде уравнения реакций: koh- fe(oh)2- fe(oh)3-fe2o3- fe...
Neznayka111111112222
30.10.2021 03:33
Вычислите площадь треугольника если bc=4, ac=8,внешний угол c=120 градусов...
sev200684
30.10.2021 03:33
Растворы каких веществ нужно взять для осущетсвления следующих реакций? срставте молек,уровения: а) s(2-) + cu(2-) = cus б) fe(3+) + 3oh= fe(oh)3 в) 2al + 6h= 2al...
skeych
30.10.2021 03:33
Напиши 4 предложения,в которых опиши синичку. используй план описания: 1. головка 2. спинка 3. грудка 4. хвостик...
shakirqasanov
30.10.2021 03:33
Втреугольнике авс угол в прямой . ав =12 см ,вс= 16 см . точка к - середина стороны ас . из точки к опущен перпендикуляр ке к стороне вс . найти длину ке....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.