Partager via

Nombre Premier

Anonyme
2023-05-31T05:21:53+00:00

Bonjour,

Comment déterminer et écrire en VBA si un nombre est un nombre premier, en n'utilisant la fonction racine carrée

D'avance merci

Microsoft 365 et Office | Excel | Pour la maison | Autres

Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.

0 commentaires

2 réponses

Trier par : Le plus utile
Le plus utile Les plus récents Les plus anciens
  1. Anonyme
    2023-06-03T05:11:28+00:00

    Bonjour,

    A priori, cela fonctionne

    Merci beaucoup

    Cette réponse a-t-elle été utile ?

    0 commentaires
  2. DanielCo 107.7K Points de réputation
    2023-05-31T05:37:07+00:00

    Bonjour,

    Trouvé ça sur internet. Essaie :

    Sub test()
    Dim N, D
    N = 70
    D = 0
    For i = 1 To N
    If N Mod i = 0 Then
    D = D + 1
    End If
    Next i
    If D = 2 Then
    MsgBox "Nombre premier"
    Else
    MsgBox "le nombre n'est pas premier"
    End If
    End Sub

    Daniel

    Cette réponse a-t-elle été utile ?

    0 commentaires