-12 / 6 / 4
Регистрация: 19.01.2017
Сообщений: 584

Натуральное число из 9999

11.10.2019, 23:20. Показов 11690. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дано натуральное число n (n <= 9999).
а) Является ли это число палиндромом (перевертышем) с учетом четырех цифр, как, например, числа 2222, 6116, 0440 и т. д.?
б) Верно ли, что это число содержит ровно три одинаковые цифры, как, например, числа 6676, 4544, 0006 и т. д.?
в) Верно ли, что все четыре цифры числа различны?

1.Исправьте ошибки
2.Перевидите на Python
Спасибо

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
#include <iostream>
#include  <cmath>
 
using namespace std;
 
int main() {
    
    int n, a, b, c, d;
 
    cout<<"n:";
    cin>>n;
    
    if(n <= 9999) {
     d = n % 10;
     c = (n % 100 - d) / 10; 
     b = (n%1000 - 10 * c - d) / 100;
     a = (n - b * 100 - c * 10 -d) / 1000;
     
         if(a == d && c == b) {
         cout<<"Polindrom!"<<endl;
         }
         if((a == b && b == c)||(b == c && c == d)||(a == b && b == d)||(a == c && c == d)){
         
         cout<<"chislo soderzhit tri odinakovyh chisla!"<<endl;
         }
         if(a != b && a != c && a != d && b != c && b != d && c != d){
         
         cout<<"Vse chetyre cifry razlichny!"<<endl;
         }
     }
     
     
    return 0;
}
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
11.10.2019, 23:20
Ответы с готовыми решениями:

Даны натуральное число a, натуральное число n. Вычислить a(a+1)(a+2).(a+n-1). Python
Даны натуральное число a, натуральное число n. Вычислить a(a+1)(a+2)...(a+n-1). Если можно,то тремя разными циклами)

Дано число в диапазоне от 0 до 9999. Приведите данное число на питоне к текстовому виду
Дано число в диапазоне от 0 до 9999. Приведите данное число на питоне к текстовому виду, например 6889– шесть тысяч восемьсот...

Натуральное число n делится без остатка на натуральное число m
Обозначим через ДЕЛ(n, m) утверждение «натуральное число n делится без остатка на натуральное число m». Для какого наименьшего натурального...

1
3582 / 2182 / 571
Регистрация: 02.09.2015
Сообщений: 5,510
11.10.2019, 23:42
Лучший ответ Сообщение было отмечено Like_society как решение

Решение

Python
1
2
3
4
5
6
7
8
9
from collections import Counter
 
n = input().strip()
if n == n[::-1]:
    print("Palindrome")
if any(count == 3 for digit, count in Counter(n).most_common()):
    print("Contains 3 equal digits")
if len(set(n)) == len(n):
    print("All digits are different")
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
11.10.2019, 23:42
Помогаю со студенческими работами здесь

Дано натуральное число n (n < 9999). Выяснить, верно ли, что это число содержит цифры
Дано натуральное число n (n &lt; 9999). Выяснить, верно ли, что это число содержит цифры, образующие арифметическую прогрессию в порядке их...

Дано натуральное число n(n<9999)
Дано натуральное число n(n&lt;9999) -Верно ли, что это число содержит ровно три одинаковые цифры, как например числа 6676,4544,0006 и т.д.? ...

Дано натуральное число N (N<=9999).
Дано натуральное число N (N&lt;=9999). А) Верно ли, что это число содержит ровно три одинаковые цифры, как, например, числа 6676, 4544, 0006...

Дано натуральное число n (n < 9999). Выяснить, верно ли, что это число содержит цифры с неубывающей последовательностью
Пожалуйста

Дано натуральное число n (n ≤ 9999)
Подскажите код, пожалуйста. Дано натуральное число n (n ≤ 9999) Верно ли, что это цисло содержит ровно три одинаковые цифры, как,...


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

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

Новые блоги и статьи
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11680&amp;d=1772460536 Одним из. . .
Реалии
Hrethgir 01.03.2026
Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни
kumehtar 27.02.2026
Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten
8Observer8 27.02.2026
Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru