Найдите все пары чисел-близнецов из отрезка

@_Ethereal · Регистрация: 24.03.2015

Author24 — интернет-сервис помощи студентам

Собственно помогите решить задачку, есть наброски на работают не совсем так, как надо.

Два простых числа называются близнецами, если они отличаются друг от друга на 2 (таковы, например, числа 41 и 43). Найдите все пары чисел-близнецов из отрезка [n,2n], где n - заданное натуральное число, большее двух, с помощью функции распознавания простых чисел. Приведём несколько примеров чисел-близнецов: (5,7), (11,13), (17,19), (22271,22273).

Visual Basic

Option explicit
dim n,m,f,t
t=CBool(m)
function bli(n)
for m=n to 2*n step 1
      t=false
    for f=2 to m-1 step 1
          if m mod f = 0 then 
                                  t=true
          end if 
    next
       if t=false then 
            msgbox "Близнецы" & VbCrLf & m 
            bli=n
       end if
next
end function
n=inputbox ("введите n")
call bli (n)

п.с поиск не помог :С

@otakuneka · 05.06.2015, 16:57

Отрабатывает вроде верно

Visual Basic

Function Sample(value)
    Sample="Простое"
    For i=2 To value-1
        If value Mod i =0 Then
            Sample="Составное"
            Exit Function
        End If
    Next
End Function
 
n=InputBox("Введите число больше 2")
For j=n To 2*n
    If Sample(j)="Простое" And Sample(j+2)="Простое" Then
        MsgBox  "Числа " & j & " и " & j+2 & " близнецы"
    End If
Next

echs · 01.08.2015, 06:16

Ваш алгоритм не самый лучший. Для поиска простых
чисел близнецов используется следующее:
1. Числа близнецы имеют вид 6n-1 и 6n+1
где n натуральное число
То есть задается цикл с шагом 6.
Такие числа по определению не делятся ни на 2 ни на 3
2. В цикле должна быть проверка. Если эти два числа
простые, то они близнецы. В противном случае берутся
два других числа. Понятно, что если из этих двух чисел
одно составное, то эта пара более не рассматривается.
И берётся следующая пара. И так до тех пор, пока не
будет проверен весь заданный интервал.

echs Регистрация: 23.10.2013 Сообщений: 5,076 Записей в блоге: 8
	01.08.2015, 06:16	3
	Ваш алгоритм не самый лучший. Для поиска простых чисел близнецов используется следующее: 1. Числа близнецы имеют вид 6n-1 и 6n+1 где n натуральное число То есть задается цикл с шагом 6. Такие числа по определению не делятся ни на 2 ни на 3 2. В цикле должна быть проверка. Если эти два числа простые, то они близнецы. В противном случае берутся два других числа. Понятно, что если из этих двух чисел одно составное, то эта пара более не рассматривается. И берётся следующая пара. И так до тех пор, пока не будет проверен весь заданный интервал. 0

Опции темы

Найдите все пары чисел-близнецов из отрезка

Решение