OTTO

Siamo all’ OTTAvo cielo

I primi due numeri consecutivi che hanno due fattori primi distinti sono i seguenti:14 = 2*7
15 = 3*5

I primi tre numeri consecutivi che hanno tre distinti fattori primi sono:

644 = 2 ²* 7* 23
645 = 3 *5* 43
646 = 2 *17* 19.

Trovare i primi quattro numeri interi consecutivi che hanno quattro fattori primi distinti.Qual è il primo di questi numeri?

p.s.

una soluzione originale = 2 crediti

Questa voce è stata pubblicata in Algoritmi, Aritmetica, Informatica, Matematica, Programmazione e contrassegnata con , , , , , , , , , , . Contrassegna il permalink.

8 risposte a OTTO

  1. bobcarr ha detto:

    va be
    2 crediti

  2. edoardobastianetto ha detto:

    Option Explicit

    Private Sub Form_Load()

    Dim i As Long
    For i = 1 To 1000000
    If (nFP(i) = 4) And (nFP(i + 1) = 4) And (nFP(i + 2) = 4) And (nFP(i + 3) = 4) Then MsgBox i
    Next i
    End Sub

    Function isPrimo(x As Long) As Boolean

    isPrimo = True

    Dim i As Integer
    For i = 2 To Int(Sqr(x))
    If x Mod i = 0 Then
    isPrimo = False
    Exit For
    End If
    Next i

    End Function

    Function nFP(x As Long) As Integer

    nFP = 0
    Dim i As Long
    For i = 2 To x / 2
    If x Mod i = 0 Then If isPrimo(i) Then nFP = nFP + 1
    Next i
    End Function

  3. edoardobastianetto ha detto:

    134043??

Lascia un commento

Inserisci i tuoi dati qui sotto o clicca su un'icona per effettuare l'accesso:

Logo WordPress.com

Stai commentando usando il tuo account WordPress.com. Chiudi sessione / Modifica )

Foto Twitter

Stai commentando usando il tuo account Twitter. Chiudi sessione / Modifica )

Foto di Facebook

Stai commentando usando il tuo account Facebook. Chiudi sessione / Modifica )

Google+ photo

Stai commentando usando il tuo account Google+. Chiudi sessione / Modifica )

Connessione a %s...