Работа 3.5 Упр.9 Задание 2 ГДЗ Семакин 10 класс (Информатика)

Задача

Рассмотрим вариант решения задания из учебника Семакин, Хеннер, Шеина 10 класс, Бином: 9. Два простых числа называются «близнецами», если они отличаются друг от друга на 2 (например, 41 и 43). Напечатать все пары «близнецов» из отрезка [n, 2n], где n — заданное натуральное число, большее 2. *Цитирирование задания со ссылкой на учебник производится исключительно в учебных целях для лучшего понимания разбора решения задания. 10 semakin10 pract/3-5/zad2/9 98

Подробный ответ

Составим функцию fact, которая вычисляет факториал числа $$n!$$.

function fact(n: integer): int64;
var i: integer;
begin
  result := 1;
  for i := 1 to n do
    result := result * i;
end;

Затем переберём все числа $$i$$ от $$n$$ до $$2n$$. Для каждого числа вычислим значение

$$value = 4\cdot (i-1)! + i + 4.$$

Если $$value$$ делится на $$i(i+2)$$ без остатка, то выводим пару чисел $$i$$ и $$i+2$$.

var
  i, n: integer;
  value: int64;
begin
  n := 10;
  for i := n to 2 * n do
  begin
    value := 4*fact(i-1) + i + 4;
    if value mod (i*(i+2)) = 0 then writeln(i:4, i + 2:4);
  end;
end.

Таким образом программа находит и печатает все пары простых чисел-близнецов на отрезке $$[n, 2n]$$.