Форум программистов, компьютерный форум, киберфорум
С++ для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.65/89: Рейтинг темы: голосов - 89, средняя оценка - 4.65
1 / 1 / 0
Регистрация: 23.09.2015
Сообщений: 101

Решето Эратосфена: найти все простые числа в интервале от A до B включительно

04.11.2015, 00:45. Показов 18427. Ответов 16
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
По введённым числам A и B вывести все простые числа в интервале от A до B включительно.
Входные данные
В единственной строке вводятся два числа 1 ≤ A≤ B≤ 100000.
Выходные данные
Вывести в одну строку все простые числа в интервале от A доB включительно.
Помогите пожалуйста, прилогаю код с других языков программирования, может кто сможет переделать под с++. Заранее благодарю.
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
uses crt;
function prost(x:integer):boolean;
var  y:integer;
     f:boolean;
begin
x:=abs(x);
if x<2 then f:=false{0,1 не простое}
else if x=2 then f:=true{2 простое}
else if x mod 2=0 then f:=false{четные юольше 2 не простые}
else
 begin
  f:=true;
  y:=3;
  while(y*y<=x)and f do
  if x mod y=0 then f:=false
  else inc(y,2);
 end;
prost:=f
end;
var a,b,i,k:integer;
begin
repeat
writeln('Введите интервал натуральных чисел');
read(a,b);
until(a>0)and(b>a);
writeln('Простые числа в интервале [',a,',',b,']');
k:=0;
for i:=a to b do
if prost(i) then
 begin
  write(i,' ');
  inc(k)
 end;
writeln;
if k=0 then write('Нет простых чисел')
else write('Их количество=',k)
end.
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
#include <stdio.h>
    #define N 20000
    //алгоритм "решето Эратосфена"
    unsigned int a[N];
    void main(){
       //заполним все ячейки числами по порядку: 0,1,2,3...
       for(int i=0; i<N; i++){
           a[i] = i;
       }
       //поскольку 1 не простое число, обнулим ячейку с этим числом
       a[1]=0;
       for(int s=2; s<N; s++){
           if(a[s]!=0){
               for(int j=s*2; j<N; j+=s){
                   a[j]=0;
               }
           }
       }
       for(i=0; i<N; i++){
           if(a[i]!=0){
                printf("%d\n", a[i]);
           }
       }
    }
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
# include <iostream>
 
using namespace std;
 
bool a[1000090];
 
int main()
{  
 
    a[0]=true;
    a[1]=true;
 
    for(long long i=2; i<=100; ++i)
    {
            if(a[i]==false)
            {
                           if(i*i<=100)
                           {
                                          for(long long j=i*i; j<=100; j+=i)
                                          {
                                                   a[j]=true;
                                          }
                           }
            }
    }
 
    for(long long i=1; i<=100; ++i)
    {
            if(a[i]==false)
            cout<<a[i]<<" ";
    }
}
Мне нужно конкретно от числа введенного с клавиатуры А до Б.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
04.11.2015, 00:45
Ответы с готовыми решениями:

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

Найти все простые числа, меньше n, используя решето Эратосфена
Заданное натуральное число n (n больше-равно 2). Найти все простые числа, меньше n, используя решето Эрастофен (Выписать все целые числа от...

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

16
7804 / 6568 / 2988
Регистрация: 14.04.2014
Сообщений: 28,705
04.11.2015, 10:52
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
int A, B;
 
cin >> A >> B;
 
vector<bool> prime(B + 1, true);
 
prime[0] = prime[1] = false;
for (int i = 2; i * i <= n; ++i)
    if (prime[i])
        for (int j = i * i; j <= n; j += i)
            prime[j] = false;
 
for (int i = A; i <= B; ++i)
    if (prime[i])
        cout << i << endl;
0
1 / 1 / 0
Регистрация: 23.09.2015
Сообщений: 101
04.11.2015, 12:13  [ТС]
nmcf, Как можно обойтись без vector? Решение не полное( не все тесты проходят.
0
7804 / 6568 / 2988
Регистрация: 14.04.2014
Сообщений: 28,705
04.11.2015, 12:19
Какие ещё тесты? Ну замени на массив bool, и предварительно заполни его true.
0
1 / 1 / 0
Регистрация: 23.09.2015
Сообщений: 101
04.11.2015, 12:52  [ТС]
nmcf, а можете подсказать как это конкретно сделать, у меня выдает ошибку.
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#include <iostream>
#include <vector>
using namespace std;
int main() {
int A, B;
 
cin >> A >> B;
 
vector<bool> prime(B + 1, true);
 
prime[0] = prime[1] = false;
for (int i = 2; i * i <= n; ++i)
    if (prime[i])
        for (int j = i * i; j <= n; j += i)
            prime[j] = false;
 
for (int i = A; i <= B; ++i)
    if (prime[i])
        cout << i << endl;
return 0; }
пишет не описана переменная n.
0
7804 / 6568 / 2988
Регистрация: 14.04.2014
Сообщений: 28,705
04.11.2015, 12:53
Замени на B.
0
1 / 1 / 0
Регистрация: 23.09.2015
Сообщений: 101
04.11.2015, 12:55  [ТС]
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
#include <iostream>
using namespace std;
int main() {
int A, B;
cin >> A >> B;
 
bool prime[10]={true};
 
prime[0] = prime[1] = false;
for (int i = 2; i * i <= 10; ++i)
    if (prime[i])
        for (int j = i * i; j <= 10; j += i)
            prime[j] = false;
 
for (int i = A; i <= B; ++i)
    if (prime[i])
        cout << i << endl;
return 0; }
- так правильно?

Добавлено через 1 минуту
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#include <iostream>
#include <vector>
using namespace std;
int main() {
int A, B;
 
cin >> A >> B;
 
vector<bool> prime(B + 1, true);
 
prime[0] = prime[1] = false;
for (int i = 2; i * i <= B; ++i)
    if (prime[i])
        for (int j = i * i; j <= B; j += i)
            prime[j] = false;
 
for (int i = A; i <= B; ++i)
    if (prime[i])
        cout << i << endl;
return 0; }
- так работает только половина тестов, п.с на сайте с олимпиадными заданиями. Вот ссылка на него, если что http://www.e-olymp.com/ru/problems/4739 .
0
Dimension
595 / 463 / 223
Регистрация: 08.04.2014
Сообщений: 1,710
04.11.2015, 13:15
неужели так сложно найти в интернете реализацию и добавить ограничения на от А до Б
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#include <bits/stdc++.h>
using namespace std;
int a, b;
const int N = 100001;
int lp[N + 1];
vector<int> pr;
int main() {
    cin >> a >> b;
    for (int i = 2; i <= b; ++i) {
        if (lp[i] == 0) {
            lp[i] = i;
            pr.push_back(i);
        }
        for (int j = 0; j<(int)pr.size() && pr[j] <= lp[i] && i*pr[j] <= b; ++j)
            lp[i * pr[j]] = pr[j];
    }
    for (auto i : pr)
        if (i >= a&&i <= b)
            cout << i << " ";
    cin.get(), cin.get();
    return 0;
}
0
4949 / 2289 / 287
Регистрация: 01.03.2013
Сообщений: 5,991
Записей в блоге: 32
04.11.2015, 13:46
На сайте написано прямым текстом про решето Эратосфена, а мне больше нравится через гипотезу Бертрана искать. Тоже все тесты проходит, и быстрее получается.
0
7804 / 6568 / 2988
Регистрация: 14.04.2014
Сообщений: 28,705
04.11.2015, 15:02
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
int A, B;
 
cin >> A >> B;
 
bool *prime = new bool[B + 1];
fill(prime + 2, prime + B + 1, true);
 
prime[0] = prime[1] = false;
for (int i = 2; i * i <= B; ++i)
    if (prime[i])
        for (int j = i * i; j <= B; j += i)
            prime[j] = false;
 
for (int i = A; i <= B; ++i)
    if (prime[i])
        cout << i << endl;
 
delete[] prime;
Подключить <algorithm>.
0
Dimension
595 / 463 / 223
Регистрация: 08.04.2014
Сообщений: 1,710
04.11.2015, 15:06
Цитата Сообщение от _Ivana Посмотреть сообщение
гипотезу Бертрана
за сколько работает ?(время ,память)
0
1 / 1 / 0
Регистрация: 23.09.2015
Сообщений: 101
04.11.2015, 15:09  [ТС]
Dimension, Спасибо работает, а как переделать под обычные массивы? Без использования vector.

Добавлено через 1 минуту
А то я не совсем понимаю , как это использовать( и мой уровень программирования ниже, чем написан.
0
4949 / 2289 / 287
Регистрация: 01.03.2013
Сообщений: 5,991
Записей в блоге: 32
04.11.2015, 15:20
Да секунды 4 считает, да.... А Бертран 0. Но может я Эратосфена неоптимально накостылил, но после Бертрана мне его и довелосипедивать не хочется даже. Хотя можно попробовать выжать оптимум.
Haskell
1
2
3
4
5
6
7
8
9
10
primesBert = 2 : filter isprime [3,5..] where
    isprime n = all ((/=0).(mod n)) $ takeWhile ((<=n).(^2)) primesBert
 
primesErat = sieve $ 2:[3,5..] where
    sieve (s:ss) = s : (filter ((/=0).(`mod` s)) $ sieve ss)
 
main = do
    let n = 2000
    print $ primesBert !! n
    print $ primesErat !! n
https://ideone.com/rS0Qhi
0
Dimension
595 / 463 / 223
Регистрация: 08.04.2014
Сообщений: 1,710
04.11.2015, 15:33
Лучший ответ Сообщение было отмечено EdHaker как решение

Решение

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#include <bits/stdc++.h>
using namespace std;
int a, b;
const int N = 100001;
int lp[N + 1];
int pr[N+1],e;
int main() {
    cin >> a >> b;
    for (int i = 2; i <= b; ++i) {
        if (lp[i] == 0) {
            lp[i] = i;
            pr[e++]=i;
        }
        for (int j = 0; j<(int)e && pr[j] <= lp[i] && i*pr[j] <= b; ++j)
            lp[i * pr[j]] = pr[j];
    }
    for (int i=0;i<=e;i++)
        if (pr[i] >= a&&pr[i] <= b)
            cout << pr[i] << " ";
    cin.get(), cin.get();
    return 0;
}
Добавлено через 11 минут
Цитата Сообщение от _Ivana Посмотреть сообщение
Да секунды 4 считает
у вас явно что-то не правильно ,У меня за 0с считает ,если искать все простые до 100к ,и за 0.01 если до 1млн
https://ideone.com/8LFRFN
1
4949 / 2289 / 287
Регистрация: 01.03.2013
Сообщений: 5,991
Записей в блоге: 32
04.11.2015, 15:39
Неудивительно, на Сях, да через заранее нарезанные статические глобальные массивы Я про сравнение алгоритмов имею в виду - Бертран имхо менее затратный (если не ошибаюсь).
0
1 / 1 / 0
Регистрация: 23.09.2015
Сообщений: 101
04.11.2015, 15:43  [ТС]
Dimension, спасибо большое, а не могли бы вы если не затруднит дать еще хоть какое-то объяснение к коду?
0
Dimension
595 / 463 / 223
Регистрация: 08.04.2014
Сообщений: 1,710
04.11.2015, 15:48
осталось только отнести этот код вашему преподавателю и получить за вас зачет,да?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
04.11.2015, 15:48
Помогаю со студенческими работами здесь

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

Вывести все простые числа алгоритмом Решето Эратосфена
Моя задача вывести в файл все простые числа из диапазона . Для отбора простых чисел использовать алгоритм Решето Эратосфена с битовым...

Получить все простые числа I, удовлетворяющие неравенству, используя решето Эратосфена
Даны натуральные числа К, Ь (К &lt; Ь). Получить все простые числа I, удовлетворяющие неравенству: К &lt; I &lt; Ь, используя решето...

Найти и распечатать в порядке убывания все простые числа из заданного промежутка, используя "решето Эратосфена"
Составить программу поиска и печати в порядке убывания все простые числа из промежутка (2..201), используя метод «решето Эратосфена»

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


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

Или воспользуйтесь поиском по форуму:
17
Ответ Создать тему
Новые блоги и статьи
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 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru