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

Дано натуральное число n. Найти все числа меньшие Мр числа Мерсенна

16.09.2019, 21:36. Показов 2322. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Вот само задание и его нужно написать на Java.
Дано натуральное число n. Найти все числа меньшие Мр числа Мерсенна.
Число Мерсенна – это простое число, представленное в виде Mp=2p–1,
где p – тоже простое число.

Есть код на Паскале:

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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
uses crt;
const nmax=60;
function Step2(n:byte):extended;
var p:extended;
    i:byte;
begin
p:=1;
for i:=1 to n do
p:=p*2;
Step2:=p;
end;
function Prost(n:longint):boolean;
var i:longint;
begin
if n<2 then Prost:=false
else
 begin
  Prost:=true;
  for i:=2 to round(sqrt(n)) do
  if n mod i=0 then
   begin
    Prost:=false;
    break;
   end;
 end;
end;
 
var n,i:byte;
begin
clrscr;
repeat
write('Введите число до ',nmax,' n=');
readln(n);
until n in [1..nmax];
for i:=1 to n-1 do
if Prost(i) then
writeln(Step2(i)-1:0:0,' ');
readln
end.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
16.09.2019, 21:36
Ответы с готовыми решениями:

Найти все числа, меньшие числа Мерсенна
Вот само задание и его нужно написать на Java.Прошу его написать на более понятном языке используя for и массивы. Дано натуральное число...

Дано натуральное число n. Найти все числа меньшие Мр числа Мерсенна
Число Мерсенна – это простое число, представленное в виде Mp=2p–1, где p – тоже простое число.

Дано натуральное число n: найти все меньшие n числа Мерсена
Переведите пожалуйста с С++ на С# Простое число называется числом Мерсена, если оно может быть представлено в виде 2p-1, где р -...

3
 Аватар для HighPredator
6045 / 2160 / 753
Регистрация: 10.12.2010
Сообщений: 6,005
Записей в блоге: 3
17.09.2019, 08:57
Java
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
public class Main {
    private static final short NMAX = 60;
 
    public static void main(String[] args) {
        Scanner scanner = new Scanner(System.in);
 
        short n;
 
        do {
            System.out.println("Enter n up to " + NMAX);
 
            n = scanner.nextShort();
        } while ((n > NMAX) || (n < 1));
 
        for (short i = 1; i < n; i++) {
            if (Prost(i))
                System.out.println(Step2(i).subtract(new BigDecimal(1)));
        }
    }
 
    private static BigDecimal Step2(short n) {
        BigDecimal p = new BigDecimal(1);
 
        for (short i = 0; i < n; i++)
             p = p.multiply(new BigDecimal(2));
 
        return p;
    }
 
    private static boolean Prost(short n) {
        if (n < 2)
            return false;
        else {
            for (short i = 2; i < Math.round(Math.sqrt(n)); i++) {
                if (n % i == 0)
                    return false;
            }
        }
 
        return true;
    }
}
0
 Аватар для Aviz__
2736 / 2046 / 506
Регистрация: 17.02.2014
Сообщений: 9,462
17.09.2019, 12:20
Цитата Сообщение от HighPredator Посмотреть сообщение
private static BigDecimal Step2(short n)

Java
1
2
3
4
   private static BigDecimal getMersenNum(int n) {
        BigDecimal two = new BigDecimal(2);
        return two.pow(n).subtract(new BigDecimal(1));
    }
1
17.09.2019, 16:36

Не по теме:

Aviz__, спс. Я вообще 0 мозга вкладывал когда переводил.

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
17.09.2019, 16:36
Помогаю со студенческими работами здесь

Дано натуральное число N. Найти все простые числа меньшие N
Дано натуральное число N. Найти все простые числа меньшие N. Я начинающий,было б отлично решить способом для начинающих :)

Дано натуральное число n. Найти все меньшие n простые числа, используя решето Эратосфена
4. Дано натуральное число n (n≥2). Найти все меньшие n простые числа, используя решето Эратосфена. Решетом Эратосфена называют следующий...

Дано натуральное число n. Получить все совершенные числа, меньшие n
Натуральное число называется совершенным, если оно равно сумме всех своих делителей, за исключением себя самого. Число 6 - совершенное, так...

Дано натуральное число n. Получить все совершенные числа, меньшие n
вот исходник но он не работает int n; n = Convert.ToInt32(textBox1.Text); for (int i = 1; i &lt;...

Дано натуральное число n. Получить все совершенные числа, меньшие n
помогите, пазязя((( есть задача: &quot;Натуральное число называется совершенным, если оно равно сумме всех своих делителей за исключением...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru