Назовем обычное число суперпростым, если в его десятичной записи

Назовем обычное число суперпростым, если в его десятичной записи есть только числа, являющиеся ординарными числами, например, числа 2, 3, 5, 7, 23 суперпростые, а 13 нет. Знаменито, что 100 вторым простым числом является число 557. А какое число является 100 вторым суперпростым?

В качестве ответа укажите одно естественное число.

Задать свой вопрос
Наталья
Знаменито, что 100 вторым простым числом является число 557
Людмила Давдо
Разве это не ответ?
1 ответ
Код

uses
  System, System.Net, System.Threading.Tasks, System.Collections.Generic;

type
    ListSimple = class
        l := new Listlt;int64gt;();
        procedure AddSimple(N: int64);
        begin
            var Result := True;
           
            var num := n;
            while num gt; 0 do begin
                if not (num mod 10 in [2,3,5,7]) then
                begin
                    Result := False;
                    break;
                end;
                num := num div 10;
            end;
            if not Result then exit;
           
            for var i: int64 := 2 to round(sqrt(N)) do
                if N mod i = 0 then
                begin
                    Result := False;
                    break;
                end;
            // lock не дозволяет нескольким потокам одновременно исполнять эту секцию.
            // Это непременно, иначе если несколько потоков одновременно будут пробовать добавить значение в список, список может оказаться испорченным
            // Секция, охраняемая lock, величается критичной
            lock l do
                if Result then
                    l.Add(N);
        end;
    end;

var
    hh := 100000;

begin
    var ls := new ListSimple;
    var ii: int64 := 2;
   
    Parallel.For(ii, ii + hh, ls.AddSimple);
    writeln(ls.l.Count);
    ls.l := ls.l.OrderBy(x-gt;x).ToList(); //- это можно включить для проверки того, что в обоих перечнях - однообразные обыкновенные числа
    for var i := 0 to ls.l.Count - 1 do
        writeln(i+1,' - ',ls.l[i]);
   
    writeln; 
    writeln('Время исполнения = ', Milliseconds); 
end.

Список суперпростых

1 - 2
2 - 3
3 - 5
4 - 7
5 - 23
6 - 37
7 - 53
8 - 73
9 - 223
10 - 227
11 - 233
12 - 257
13 - 277
14 - 337
15 - 353
16 - 373
17 - 523
18 - 557
19 - 577
20 - 727
21 - 733
22 - 757
23 - 773
24 - 2237
25 - 2273
26 - 2333
27 - 2357
28 - 2377
29 - 2557
30 - 2753
31 - 2777
32 - 3253
33 - 3257
34 - 3323
35 - 3373
36 - 3527
37 - 3533
38 - 3557
39 - 3727
40 - 3733
41 - 5227
42 - 5233
43 - 5237
44 - 5273
45 - 5323
46 - 5333
47 - 5527
48 - 5557
49 - 5573
50 - 5737
51 - 7237
52 - 7253
53 - 7333
54 - 7523
55 - 7537
56 - 7573
57 - 7577
58 - 7723
59 - 7727
60 - 7753
61 - 7757
62 - 22273
63 - 22277
64 - 22573
65 - 22727
66 - 22777
67 - 23227
68 - 23327
69 - 23333
70 - 23357
71 - 23537
72 - 23557
73 - 23753
74 - 23773
75 - 25237
76 - 25253
77 - 25357
78 - 25373
79 - 25523
80 - 25537
81 - 25577
82 - 25733
83 - 27253
84 - 27277
85 - 27337
86 - 27527
87 - 27733
88 - 27737
89 - 27773
90 - 32233
91 - 32237
92 - 32257
93 - 32323
94 - 32327

95 - 32353
96 - 32377
97 - 32533
98 - 32537
99 - 32573
100 - 33223
101 - 33353
102 - 33377
103 - 33533
104 - 33577
105 - 33757
106 - 33773
107 - 35227
108 - 35257
109 - 35323
110 - 35327
111 - 35353
112 - 35527
113 - 35533
114 - 35537
115 - 35573
116 - 35753
117 - 37223
118 - 37253
119 - 37273
120 - 37277
121 - 37337
122 - 37357
123 - 37537
124 - 37573
125 - 52223
126 - 52237
127 - 52253
128 - 52553
129 - 52727
130 - 52733
131 - 52757
132 - 53233
133 - 53323
134 - 53327
135 - 53353
136 - 53377
137 - 53527
138 - 53773
139 - 53777
140 - 55333
141 - 55337
142 - 55373
143 - 55733
144 - 57223
145 - 57373
146 - 57527
147 - 57557
148 - 57727
149 - 57737
150 - 57773
151 - 72223
152 - 72227
153 - 72253
154 - 72277
155 - 72337
156 - 72353
157 - 72533
158 - 72577
159 - 72727
160 - 72733
161 - 73237
162 - 73277
163 - 73327
164 - 73523
165 - 73553
166 - 73727
167 - 73757
168 - 75223
169 - 75227
170 - 75253
171 - 75277
172 - 75323
173 - 75337
174 - 75353
175 - 75377
176 - 75527
177 - 75533
178 - 75553
179 - 75557
180 - 75577
181 - 75773
182 - 77237
183 - 77323
184 - 77377
185 - 77527
186 - 77557
187 - 77573
188 - 77723
189 - 77773

, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость

Физика.

Из точки м выходят 3 луча MP MN и MK причём

Геометрия.

выпиши в свою тетрадь те правила этикета которые тебе не были

Разные вопросы.

Анна хорошо учится у неё много подруг свободное от учёбы время

Обществознание.

10) Килограмм конфет дороже килограмма печенья на 52 р. За 8

Математика.

Во сколько раз число атомов кислорода в земной коре больше числа

Химия.

Составить монолог от имени дневника двоечника 7-10 предложений

Русский язык.

Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо

Разные вопросы.

Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных

Разные вопросы.

Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей

Математика.

Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт