Répondre à la discussion
Affichage des résultats 1 à 6 sur 6

help me



  1. #1
    jessica_saw

    help me


    ------

    salut tout le monde pourriez vous m'aider a ecrire le programme VBA de la miltiplication russe; come cet exemple
    pour multiplier 45 et 19 :
    45 19 19 (45 est impaire, on garde le nombre en face ici 19)
    45/2= 22 19*2= 38 (22 est paire on ne fait rien)
    22/2 11 38*2= 76 76 ….
    11/2= 5 76*2= 152 152
    5/2= 2 152*2= 304
    2/2= 1 608 608
    -------
    855 =somme de tous les nombres

    -----

  2. Publicité
  3. #2
    jessica_saw

    Re : help me

    personne !!

  4. #3
    whoami

    Re : help me

    Bonjour,

    Je ne vois pas la difficulté. Tu connais l'algorithme, donc ...

  5. #4
    Dormeur74

    Re : help me

    Ca c'est mieux.

    Code:
    Private Sub CommandButton1_Click()
      Dim a1, b1, Somme As Long
      
      a1 = InputBox("Entrez une valeur a : ", "Saisie")
      b1 = InputBox("Entrez une valeur b : ", "Saisie")
      If a1 <= b1 Then Somme = a1
      
      Do
          b1 = Int(b1 / 2)
          a1 = a1 * 2
          If b1 Mod 2 = 1 Then
              Somme = Somme + a1
          End If
      Loop Until b1 = 1
      
      MsgBox Somme
      End
    End Sub

  6. A voir en vidéo sur Futura
  7. #5
    whoami

    Re : help me

    Bonjour,

    Tu ne rends pas vraiment service au demandeur en lui étalant une solution "clés en main", au contraire.

  8. #6
    Jack
    Modérateur

    Re : help me

    +1

    Si je genre de difficulté ne peut être franchie avec un minimum d'aide, il faut laisser tomber l'informatique.

    A+

  9. Publicité