IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBScript Discussion :

conversion C en VBA


Sujet :

VBScript

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Novembre 2009
    Messages
    44
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Novembre 2009
    Messages : 44
    Par défaut conversion C en VBA
    Bonjour,
    je souhaite convertir ce code de C vers du VBA.
    Cependant, je n'arrive pas à comprendre le programme surtout la déclaration des variables.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    49
    50
    51
    52
    53
    54
    55
    56
    57
    58
    59
    60
    61
    62
    63
    64
    65
    66
    67
    68
    69
     
     
    #include <stdio.h>
    #include <stdlib.h>
    #include <string.h>
    #include <time.h>
     
    int     alea(int n, int p);
    void    combinaisonAleatoire(int n, int p);
     
    int
    main(int argc, char *argv[])
    {
      int     n, p, k = 1, i, j, cnp, *L, *t;
      srandom(time(NULL));
      if (argc < 3) {
        printf("Combinaisons aléatoires\n"
           "Sous-ensembles au hasard de p éléments de [1 n]\n"
           "usage : %s n p [k]\n", argv[0]);
        exit(1);
      }
      n = atoi(argv[1]);		
      p = atoi(argv[2]);
      if (argc > 3) {
        k = atoi(argv[3]);
      }
      if (n < 0 || p < 0 || p > n || k <= 0)
        return 0;
      for (i = 0; i < k; i++) {
        combinaisonAleatoire(n, p);
        printf("\n");
      }
      return 0;
    }
     
    int
    alea(n, p)
    {
      return ((double) n * random() / (RAND_MAX + 1.0) < (double) p) ? 1 : 0;
    }
     
    #ifdef RECURSE
    void
    combinaisonAleatoire(n, p)
    {
      if (n < p || p < 0) {
        return;
      } else if (alea(n, p)) {
        combinaisonAleatoire(n - 1, p - 1);
        if (p > 1) {
          printf(" ");
        }
        printf("%d", n);
      } else {
        combinaisonAleatoire(n - 1, p);
      }
    }
    #else
    void
    combinaisonAleatoire(n, p)
    {
      for (; n >= p && p >= 0; n--) {
        if (alea(n, p)) {
          printf("%d ", n);
          p--;
        }
      }
    }
    #endif
    Je vous remercie de votre aide.

  2. #2
    Expert confirmé
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 130
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 69
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 130
    Par défaut
    Pas sur le bon forum, tu devrais poster ta demande dans Général VBA ou un de ces sous forum.
    Je ne déplace pas ta discussion, à toi de choisir le forum/sous forum qui te semble le mieux approprié.
    Quand cela sera fait, signales le nous ici.
    :whistle:pourquoi pas, pour remercier, un :plusser: pour celui/ceux qui vous ont dépannés.
    saut de ligne
    OOOOOOOOO👉 → → Ma page perso sur DVP ← ← 👈

Discussions similaires

  1. Conversion SOMMEPROD en VBA
    Par choudoudou15 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 23/06/2009, 16h41
  2. Probleme conversion PDF par VBA
    Par Raikko68 dans le forum Macros et VBA Excel
    Réponses: 7
    Dernier message: 02/10/2008, 12h06
  3. Conversion C# en VBA
    Par mamath1234 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 11/04/2008, 00h12
  4. Conversion Vb6 Vers Vba
    Par thunderpat dans le forum VB 6 et antérieur
    Réponses: 1
    Dernier message: 29/03/2007, 11h49
  5. Conversion des codes VBA Access en VB6
    Par cokouT dans le forum Access
    Réponses: 1
    Dernier message: 23/11/2006, 09h52

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo