Форум программистов, компьютерный форум, киберфорум
C# для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 08.12.2022
Сообщений: 5

О числах Кита

08.12.2022, 23:39. Показов 570. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте. Подскажите, пожалуйста, как в коде ниже дополнительно реализовать поиск обратных чисел Кита? Что-то никак не могу додуматься (обратные числа нужно сохранить в файл "ReverceKeith"). И можно ли в принципе как-то ускорить алгоритм нахождения таких чисел?

Кликните здесь для просмотра всего текста
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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
using System;
using System.Collections;
using System.IO;
using System.Diagnostics;
 
namespace KeithNumber
{
    class Program
    {
        static void Main(string[] args)
        {
            ulong n1 = 10;                        // начало диапазона
            ulong n2 = 2500000;                  // конец диапазона
 
            // Сохраняем результаты в файл
            StreamWriter sw = new StreamWriter(@"C:\KeithResult\KeithNumber.txt", true);
 
            // Засекаем время
            Stopwatch stopWatch = new Stopwatch();
            stopWatch.Start();
 
            while (n1 < n2 + 1)
            {
                ArrayList terms = new ArrayList();
                ulong temp = n1;
                int x = 0;                       // x - количество цифр в n1
 
                while (temp > 0)
                {
                    terms.Add(temp % 10);
                    temp = temp / 10;
                    x++;
                }
                // Получаем цифры в правильном порядке от старшего разряда к младшему
                terms.Reverse();
 
                // Ищем следующие члены последовательности, пока мы не достигнем либо n1, либо числа, большего чем n1.
                ulong next_term = 0;
                int i = x;
                while (next_term < n1)
                {
                    next_term = 0;
 
                    // Следующий член является суммой предыдущих x членов
                    for (int j = 1; j <= x; j++)
                        next_term += (ulong)terms[i - j];
 
                    terms.Add(next_term);
                    i++;
 
                    // Если next_term равно n1, то n1 является числом Кита и...
                    if (next_term == n1)
                    {
                        // ... выводим сообщение на экран
                        Console.WriteLine("Найдено число Кита! Это число: " + next_term);
 
                        // ... и сохраняем в файл
                        sw.WriteLine(next_term);
                    }
                }
                n1++;
            }
            sw.Close();
            stopWatch.Stop();
            Console.WriteLine("Время выполнения программы: " + stopWatch.Elapsed);
            Console.ReadKey();
        }
    }
}
Миниатюры
О числах Кита  
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
08.12.2022, 23:39
Ответы с готовыми решениями:

Определить количество цифр в введенных числах и вывести на экран сколько цифр в первом и втором числах
ввести 2 числа, определить количество цифр в введеных числах и вывести на экран сколько цифр в первом и втором числах

Включение сегмент точки при числах больше «5» и отключение при числах меньше «5»
Дополните схему и программу таким образом, чтобы сегмент-точка включался при числах больше «5» и отключался при числах меньше «5». ...

Нарисовать кита
Здраствуйте. Сегодня должен сдать все работы, не хватает одной практической т.к не умею рисовать во всех проявлениях. Даже на командах в...

3
0 / 0 / 0
Регистрация: 08.12.2022
Сообщений: 5
11.12.2022, 16:11  [ТС]
Ну или хотя-бы подскажите, как "подружить" код с большими числами (до 40-50 значных, не больше). Заранее благодарен.
0
0 / 0 / 0
Регистрация: 08.12.2022
Сообщений: 5
12.12.2022, 21:06  [ТС]
Итак, после некоторых манипуляций вроде кое-что получилось. По крайней мере вычисления больших чисел вроде дают правильные результаты (сравниваю уже с известными).
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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
using System;
using System.Collections;
using System.IO;
using System.Diagnostics;
using System.Numerics;
 
namespace KeithNumber
{
    class Program
    {
        static void Main(string[] args)
        {
            string str1 = "127304146123884420932123246000";
            BigInteger n1 = BigInteger.Parse(str1);
            string str2 = "127304146123884420932123249000";
            BigInteger n2 = BigInteger.Parse(str2);
 
            // Сохраняем результаты в файл
            StreamWriter sw = new StreamWriter(@"C:\KeithResult\KeithNumber.txt", true);
 
            // Засекаем время
            Stopwatch stopWatch = new Stopwatch();
            stopWatch.Start();
 
            while (n1 < n2 + 1)
            {
                ArrayList terms = new ArrayList();
                BigInteger temp = n1;
                int x = 0;                       // x - количество цифр в n1
 
                while (temp > 0)
                {
                    terms.Add(temp % 10);
                    temp = temp / 10;
                    x++;
                }
                // Получаем цифры в правильном порядке от старшего разряда к младшему
                terms.Reverse();
 
                // Ищем следующие члены последовательности, пока мы не достигнем либо n1, либо числа, большего чем n1.
                BigInteger next_term = 0;
                int i = x;
                while (next_term < n1)
                {
                    next_term = 0;
 
                    // Следующий член является суммой предыдущих x членов
                    for (int j = 1; j <= x; j++)
                        next_term += (BigInteger)terms[i - j];
 
                    terms.Add(next_term);
                    i++;
 
                    // Если next_term равно n1, то n1 является числом Кита и...
                    if (next_term == n1)
                    {
                        // ... выводим сообщение на экран
                        Console.WriteLine("Найдено число Кита! Это число: " + next_term);
 
                        // ... и сохраняем в файл
                        sw.WriteLine(next_term);
                    }
                }
                n1++;
            }
            sw.Close();
            stopWatch.Stop();
            Console.WriteLine("Время выполнения программы: " + stopWatch.Elapsed);
            Console.ReadKey();
        }
    }
}
Хотелось бы совета от опытных людей: есть ли в подобной реализации подводные камни, о которых полезно было бы узнать? Я понимаю, что код полное ...., но пока иначе никак не могу реализовать, к сожалению...
0
Эксперт JavaЭксперт по электроникеЭксперт .NET
 Аватар для wizard41
3430 / 2749 / 575
Регистрация: 04.09.2018
Сообщений: 8,633
Записей в блоге: 3
12.12.2022, 21:07
Цитата Сообщение от naewly Посмотреть сообщение
есть ли в подобной реализации подводные камни
да фиг его знает. Камни подводные везде есть, если приглядеться...
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
12.12.2022, 21:07
Помогаю со студенческими работами здесь

Числа Кита
Это числа, которые придумал математик Майк Кит. Они замечательны способом получения: если составить последовательность из цифр числа,...

Нарисовать кита
нужно расположить рисунок в каждом углу и посередине экрана

Нарисовать кита
Помогите пожалуйста нарисовать кита в Pascal как на рисунке ниже (без координатной плоскости).

Нарисовать кита
Ссылка на сторонний ресурс удалена нужно нарисовать кита,сам не шарю,заранее спасибо!!! almas5, ссылки на сторонние ресурсы...

Три кита ООП
Нужно показать, где в коде находятся Инкапсуляция, Наследование, Полиморфизм. Помогите пожалуйста это сделать. class Game { ...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при изменении наименования справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода!
anaschu 24.03.2026
Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
Midnight Chicago Blues
kumehtar 24.03.2026
Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++
8Observer8 24.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip
Жизнь в неопределённости
kumehtar 23.03.2026
Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .
Модель здравоСохранения: работники работают быстрее после её введения.
anaschu 23.03.2026
geJalZw1fLo Корпорация до введения программа здравоохранения имела много невыполненных работниками заданий, после введения программы количество заданий выросло. Но на выплатах по больничным это. . .
Контроль уникальности заводского номера
Maks 23.03.2026
Алгоритм контроля уникальности заводского (или серийного) номера на примере нетипового документа выдачи шин для спецтехники с табличной частью, разработанного в конфигурации КА2. Номеклатура. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru