СДАМ ГИА: РЕШУ ЕГЭ
Образовательный портал для подготовки к экзаменам
Информатика
Информатика
Сайты, меню, вход, новости


Задания
Версия для печати и копирования в MS Word
Задание 25 № 27850

Напишите программу, которая ищет среди целых чисел, принадлежащих числовому отрезку [245 690; 245 756] простые числа. Выведите на экран все найденные простые числа в порядке возрастания, слева от каждого числа выведите его порядковый номер в последовательности. Каждая пара чисел должна быть выведена в отдельной строке.

Например, в диапазоне [5; 9] ровно два различных натуральных простых числа  — это числа 5 и 7, поэтому для этого диапазона вывод на экране должна содержать следующие значения:

1 5

3 7

 

Примечание. Простое число — натуральное число, имеющее ровно два различных натуральных делителя — единицу и самого себя.

Ответ:

Решение.

Решим задачу перебором. Будем проверять количество делителей каждого числа из диапазона, если их количество равно двум — выводим пару чисел на экран.

 

Приведём решение на языке Pascal.

var

x, count, numDel, i, j: longint;

begin

count := 0;

for i := 245690 to 245756 do begin

count := count + 1;

numDel := 2;

for j := 2 to round(sqrt(i)) do begin

if i mod j = 0 then begin

numDel := numDel + 1;

if numDel > 2 then break;

end;

end;

if numDel = 2 then writeln(count, ' ', i);

end;

end.

В результате работы программа должна вывести следующее:

22 245711

30 245719

34 245723

52 245741

58 245747

64 245753