Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
tatiana2017D
19.02.2022 20:10 •
Информатика
:в натуральном числе, найти количество цифр, которые больше его десятков. формат ввода: на вход подается натуральное число от 10 до 30000. формат вывода: найденное количество.
Показать ответ
Ответ:
hyihy
08.10.2020 17:50
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger;
var s:=n.ToString;
var d:=s[s.Length-1];
s.Where(c->c>d).Count.Println
end.
Пример
15334
2
0,0
(0 оценок)
Популярные вопросы: Информатика
Dillzy
31.01.2023 03:43
При делении числа на число вычислить целую часть (//) и остаток (%): 20//7=25%12=52//10=45%4=15//25=40%100= ...
lozovskaya2004
30.06.2020 16:13
ЗАДАНИЯ Установи соответствия типов интерфейса с их определением:Примитивный типМенюГрафический пользовательский интерфейсорганизует взаимодействие человека с компьютером...
толян50
14.11.2022 23:14
3.Барс решил осмотреть достопримечательности Астаны. В конце путешествия Барс устал и сменил одежду. Напиши программу, которая будет выполнять действия Барса, используя...
udinaaa
24.02.2023 14:37
Объясните подробно как записывается десятичное число 3 в двоичной системе счисления...
настя7566
20.03.2023 02:21
На экране дисплея необходимо отображать 2 в 24 степени (16777216) различных цветов.вычислить необходимый объём одной страницы видеопамяти в мегабайтах при разрешающей...
milana372
20.03.2023 02:21
Напиши сочетания клавиш (например, alt+f4), при которых можно сделать следующее: закрыть активное окно, например, редактор документа, программу какая комбинация?...
0Lvovich0
20.03.2023 02:21
Подсчитать количество заглавных букв в алфавите в паскале...
sprinter99
02.10.2021 21:26
Выбери визуальные HTML-редакторы. HtmlDocEdit TOWeb Notepad++ Note Tab CoffeeCup Visual Site Designer 2.Выбери текстовые редакторы, которые можно использовать для создания...
ано6
01.05.2022 07:19
Язык паскаль Если решите этот номер, то зайдите на мой аккаунт и решите 2 номер) Если не тяжело конечно....
tatksyushap06w3y
23.10.2020 04:24
Дан двумерный массив размерностью 6 на 8, элементы которого находятся в диапазоне [-20,30]. Определить на каком месте находится минимальный элемент массива 2. Дан двумерный...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger;
var s:=n.ToString;
var d:=s[s.Length-1];
s.Where(c->c>d).Count.Println
end.
Пример
15334
2