0 / 0 / 0
Регистрация: 17.10.2010
Сообщений: 6

Количество различных цифр в десятичной записи натурального числа

07.11.2010, 15:23. Показов 3458. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Написать программу, подсчитывающую количество различ-ных цифр в десятичной записи натурального числа n.
Зарание спасибо
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
07.11.2010, 15:23
Ответы с готовыми решениями:

Подсчитать количество различных цифр в десятичной записи натурального числа
Подсчитать количество различных цифр в десятичной записи натурального числа

Подсчитать количество различных (значащих) цифр в десятичной записи натурального числа
Помогите решить задачу!!! Плиз! Подсчитать количество различных (значащих) цифр в десятичной записи натурального числа n и напечатать в...

Вычислить количество различных цифр в десятичной записи числа
Прошу помощи! Вычислить количество различных цифр в десятичной записи числа.

3
Почетный модератор
 Аватар для Puporev
64312 / 47609 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
07.11.2010, 15:27
Adik1991, Точно на строки задача?
0
0 / 0 / 0
Регистрация: 17.10.2010
Сообщений: 6
07.11.2010, 15:31  [ТС]
нет, сори перепутал, задание на Множества.
0
Почетный модератор
 Аватар для Puporev
64312 / 47609 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
07.11.2010, 16:02
Вообще-то я не про это спрашивал, понятно что на множества. Просто вопрос был о том, число вводится как строка, или как целое число типа Longint.
Раз уж сначала были строки, то так.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
uses crt;
var s:string;
    m:set of char;
    k,i:byte;
begin
clrscr;
repeat
k:=0;
writeln('Введите натуральное число:');
readln(s);
for i:=1 to length(s) do
if not(s[i] in ['0'..'9']) then k:=1;
if k=1 then writeln('Это не натуральное число, повторите ввод');
until k=0;
m:=[];k:=0;
for i:=1 to length(s) do
if not(s[i] in m) then
 begin
  k:=k+1;
  m:=m+[s[i]];
 end;
write('Количество различных симолов в строке  равно ',k);
readln
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
07.11.2010, 16:02
Помогаю со студенческими работами здесь

Найти количество различных цифр в десятичной записи числа.
Дано N(1<=N<=10^9). Найти количество различных цифр в десятичной записи числа. Количество сравнений во время исполнения программы не...

Сколько различных цифр в десятичной записи числа
Задачка на цикл for: Дано Натуральное число N.Найти сумму S=1+1/2+1/3+...+1/N. ______________________________________ Задачка на...

Сколько различных цифр в десятичной записи данного числа
Дано натуральное число N.Сколько различных цифр в его десятичной записи. Помогите решить пожалуйста, буду всем очень признателен.

Подсчет количества различных значащих цифр в десятичной записи числа
Здравствуйте уважаемы форумчане! Помогите решить задачу: составить программу подсчета количества различных значащих цифр в десятичной...

Подсчитать количество простых чисел в десятичной записи натурального числа n
Составить программу, которая подсчитывает количество простых чисел в десятичному записи натурального числа n. Напечатать числа, которые...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

Новые блоги и статьи
Мульти-тенантные БД с PostgreSQL Row Security
Codd 23.04.2025
Современные облачные сервисы и бизнес-приложения всё чаще обслуживают множество клиентов в рамках единой программной инфраструктуры. Эта архитектурная модель, известная как мульти-тенантность, стала. . .
Реализация конвейеров машинного обучения с Python и Scikit-learn
AI_Generated 23.04.2025
Мир данных вокруг нас растёт с каждым днём, и умение эффективно обрабатывать информацию стало необходимым навыком. Специалисты по машинному обучению ежедневно сталкиваются с задачами предобработки. . .
Контроллеры Kubernetes Ingress: Сравнительный анализ
Mr. Docker 23.04.2025
В Kubernetes управление входящим трафиком представляет собой одну из ключевых задач при построении масштабируемых и отказоустойчивых приложений. Ingress — это API-объект, который служит вратами. . .
Оптимизация кода Python с Cython и Numba
py-thonny 23.04.2025
Python прочно обосновался в топе языков программирования благодаря своей простоте и гибкости. Разработчики любят его за читабельность кода и богатую экосистему библиотек. Но у этой медали есть и. . .
Микросервис на Python с FastAPI и Docker
ArchitectMsa 23.04.2025
В эпоху облачных вычислений и растущей сложности программных продуктов классическая монолитная архитектура всё чаще уступает место новым подходам. Микросервисная архитектура становится фаворитом. . .
Создаем веб-приложение на Vue.js и Laravel
Reangularity 23.04.2025
Выбор правильного технологического стека определяет успех веб-проекта. Laravel и Vue. js формируют отличную комбинацию для создания современных приложений. Laravel — это PHP-фреймворк с элегантным. . .
Максимальная производительность C#: Span<T> и Memory<T>
stackOverflow 22.04.2025
Мир высоконагруженных приложений безжалостен к неэффективному коду. Каждая миллисекунда на счету, каждый выделенный байт памяти может стать причиной падения производительности. Разработчики на C#. . .
JWT аутентификация в Java
Javaican 21.04.2025
JWT (JSON Web Token) представляет собой открытый стандарт (RFC 7519), который определяет компактный и самодостаточный способ передачи информации между сторонами в виде JSON-объекта. Эта информация. . .
Спринты Agile: Планирование, выполнение, ревью и ретроспектива
EggHead 21.04.2025
Спринты — сердцевина Agile-методологии, позволяющая командам создавать работающий продукт итерационно, с постоянной проверкой гипотез и адаптацией к изменениям. В основе концепции спринтов лежит. . .
Очередные открытия мега простых чисел, сделанные добровольцами с помощью домашних компьютеров
Programma_Boinc 21.04.2025
Очередные открытия мега простых чисел, сделанные добровольцами с помощью домашних компьютеров. 3 марта 2025 года, в результате обобщенного поиска простых чисел Ферма в PrimeGrid был найден. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru