Flux rss
Collection CommentÇaMarche.net
Rechercher : dans
Par :

Algorithme du ppmc

stephane, le jeudi 24 février 2005 à 11:54:13 
 Signaler ce message aux modérateurs

Salut, j'aimerais savoir si quelqu'un connaît un algo pour avoir le ppmc de plusieurs nombres. (plus petit multiple commun). Merci d'avance.

1

PASCAL, le jeudi 24 février 2005 à 12:16:00
  • +2

Tout d'abord tu prends le plus grand de tous les nombres que tu veux comparer, tu l'appelle [maxi], puis tu le multiplie par n (tu demare avec n=1)
ensuite tu divise chaque nombre par [maxi] x n si le resultat de la division est un entier pour chaque nombre tu as trouvé le ppcm. si pour au moin un des nombre le resultat de la division n'est pas un entier alors tu incremente n de 1 et tu recommence.

voici le code en Liberty BASIC.

print "calcul du plus petit commun multiple"
input "combien de nombres voulez-vous comparer ";nb
dim n(nb)
maxi=0
for i=1 to nb
print "entrez le nombre numero ";i
input n(i)
maxi=max(maxi, n(i))
next i
while z=0
z=1
count=count+1
multiple=maxi*count
for u=1 to nb
cp=multiple/n(u)
ab=int(cp)
if ab<>cp then z=0
next u
wend
print "le ppcm de :"
for i=1 to nb
print n(i)
next i
print "est :"
print multiple
wait

Tu trouveras Liberty BASIC en telechargement sur le site :

http://lbasic.atomysk.com

et de l'aide sur le forum qui va avec:

http://lbasic.atomysk.com/forum/

Répondre à PASCAL

2

pascal, le jeudi 24 février 2005 à 12:21:51

Voici le lien direct sur le forum de Liberty BASIC.

http://lbasic.atomysk.com/forum/viewtopic.php?p=903#903

Répondre à pascal

3

pascal, le jeudi 24 février 2005 à 14:16:21

Si on develloppe un peu plus le sujet on peu aussi considerer un ensemble de nombre en le divisant en deux sous-ensembles. dès lors le ppcm de l'ensemble est aussi le ppcm des ppcm des deux sous-ensembles.

on peu exploiter cette particularité pour accelerer les calculs en prenant les deux premiers nombres, on calcul le ppcm, puis on prends le ppcm obtenu et le troisieme nombre, on calcule le ppcm, on prends le ppcm et le quatrieme et ainsi de suite jusqu'a la fin de la liste.

voici le code:

print "calcul du plus petit commun multiple"
input "combien de nombres voulez-vous comparer ";nb
dim n(nb)
maxi=0
for i=1 to nb
print "entrez le nombre numero ";i
input n(i)
next i
cls
print "je recherche le ppcm de ces nombres..."
sort n(, nb, 1
for i=1 to nb
print n(i)
next i
nb1=n(1)
nb2=n(2)
gosub [ppcm]
if nb>2 then
for u=3 to nb
nb1=ppcm
nb2=n(u)
gosub [ppcm]
next u
end if
print "le ppcm est :"
print ppcm
input r$
end

[ppcm]
count=0
while z=0
scan
z=1
count=count+1
ppcm=nb1*count
cp=ppcm/nb2
ab=int(cp)
if ab<>cp then z=0
wend
return

@++

ps: [code]test[/code]

Répondre à pascal

4

stephane, le vendredi 25 février 2005 à 18:13:00

Merci pour ta solution...

Répondre à stephane

5

pascal, le samedi 26 février 2005 à 05:44:31

Tu veux le PGCD ?
la factorisation ?
les nbres premiers ?

Répondre à pascal

26

carolina02, le mardi 7 octobre 2008 à 01:16:14

Slt pascale je suis vraiment besoin de ton aide je ss en 1er année en tdi et je trouve des prob avec algo est les nombre premier
et j'ai une exercice que j'ai pa copris si tuu vx m'aider pour trouuuver sa solution svp
exercice
nombres de fibonacci
considérons la suite de fibonacci:le 1er nbr de la suite vaut1.le deuxieme 2 et chacun des nbr suivants s'obtient par la formule:
f=derniereavant dernier
ou dernier et avant dernier sont respectivement le dernier et l'avant dernier des nbr de fibonacci
ecrire un algo qui calcule et affiche les n premier nbr de fibonacci n'etant saisi par l'utilisateur par exemple.pour n=6,les 6 premier nbr de fibonacci:1.2.3.8.13.si t'as trouver une solution et tu vx m'aider mon msn et tgr_hsf@hotmail.com et jvx la solution le plus possible

Répondre à carolina02

27

KX, le mardi 7 octobre 2008 à 09:40:52

En réalité la suite de Fivbonacci commence toujours par 1,1,2...

procedure Fibonnacci(n:integer);
          procedure Intermediaire(n,a,b:integer);
          begin
          if n>0 then begin
                      writeln(a);
                      Intermediaire(n-1,b,a+b);
                      end;
          end;
begin
if n<2 then writeln(1); // cas n=0 ou n=1
if n=1 then writeln(1); // cas n=1
if n>1 then Intermediaire(n+1,1,1);
end;
La confiance n'exclut pas le contrôle 

Répondre à KX

6

us, le lundi 4 juillet 2005 à 23:01:05

Slt,
Bah oui... j'veux bien... merçi... A+
Amicalement, Us.

Répondre à us

7

p.legal, le mardi 5 juillet 2005 à 13:33:13

Et UN calcul de PGCD par ici :

    print "calcul du plus grand commun diviseur"
    input "combien de nombres voulez-vous comparer ";nb
    dim n(nb)
    maxi=0
    for i=1 to nb
        print "entrez le nombre numero ";i
        input n(i)
    next i
    cls
    print "je recherche le pgcd de ces nombres..."
    sort n(, nb, 1
    for i=1 to nb
        print n(i)
    next i
    nb1=n(1)
    nb2=n(2)
    gosub [pgcd]
    if nb>2 then
        for u=3 to nb
            nb1=pgcd
            nb2=n(u)
            gosub [pgcd]
        next u
    end if
    print "le pgcd est :"
    print pgcd
    input r$
    end

[pgcd]
    mini=min(nb1, nb2)
    maxi=max(nb1, nb2)
    ecart=maxi-mini
    if nb1*nb2=0 then
        pgcd=maxi
        goto [end.pgcd]
    end if
    
    while ecart<>0
        scan
        maxi=max(ecart,mini)
        mini=min(ecart,mini)
        ecart=maxi-mini
    wend
    pgcd=maxi
    [end.pgcd]
    return


@++

liberty BASIC France: http://lbasic.atomysk.com
Forum d'aide : http://lbasic.tatomysk.com/forum

Répondre à p.legal

8

nono78 pro genius, le samedi 1 décembre 2007 à 08:52:13

Rien de plus simple que les algorythme de comparaison de 2 facteur 1er .


ppcm ou pgcd,

tu prend le print( calcul du + grand diviseur commun pr les incultes), tu emt le nombre input que tu veux comparer(2 facteur 1er),


pr le pgcd , tu divise lun par lautre jusqa la fin , enfin c du niveau 4eme , mai pr le ppcm , tu dois prendre le " maxi" puis tu le multiplie par un nombre " n".apres tu divise chaque nombre par [maxi]x n ,( ps jexpik - bien jsui pa doué pr expliker).
= si le resultat est un nombre entier pr chaque division , TA TROUVE LE PPCM !!
pour " print" fo pa lutiliser n' importe comment ,

si tu trouve pa de nb entier o depart, tu recommence en changeant de " maxi".

Répondre à nono78 pro genius

9

arnaud genius 78700, le samedi 1 décembre 2007 à 09:10:29

Bah deja ,pr calculer le ppcm , c juste une variante du pgcd , ya pa besoin de fer attention aux codage (ex : print , maxi"x")

tu prend des 2 nombres , le + grand tu le multiplie par "n", ensuite tu divise tt tes nombre par maxi , si tu trouve des nombres entier c le ppcm sinon tu recolmmence en changeant de "n"

Répondre à arnaud genius 78700

11

p.legal, le samedi 1 décembre 2007 à 11:43:28

Les sites ont changés d'adresse.

liberty Basic France : http://www.lbasic.fr
et son forum : http://www.lbasic.fr/forum/

Répondre à p.legal

12

no life des maths, le mardi 4 décembre 2007 à 12:03:25

A mort wow vive les maths !!!! sale no life retourne jouer a wow Gw ca tue

Répondre à no life des maths

13

tueur de noob, le mardi 4 décembre 2007 à 12:05:13

...XD , on es sur un site de maths , halalala c pas vrai !!

Répondre à tueur de noob

14

seconde 12 lol, le jeudi 6 décembre 2007 à 08:38:06

ETIENNE ARMANGO est un delegue nul , il sait rien faire et est un vrai noob ! c un cas c un cas , allons enfants de laaaa patrie !!
lalala lala llalala , vive guild wars

Répondre à seconde 12 lol

15

mettons un terme o no lifisme, le vendredi 7 décembre 2007 à 09:59:31

Bon la , lmes no life du jeu on arrete , surtout alexi de la 1ere S de jules ferry !! ok ?

Répondre à mettons un terme o no lifisme

16

wendell mathematicus, le vendredi 7 décembre 2007 à 10:03:54

Bon stop , ok alexis c un noob ^^ bon la c un site de maths okay ? alors allez le fer chier sur GW

Répondre à wendell mathematicus

17

exterminator de maths, le vendredi 7 décembre 2007 à 10:08:11

Bon , confllanst st honorine a gagné la coupe du monde des + gros taux de joueur Gw sur la planete !!


60000 no life ( c a dire le nombre de hb dans la ville) et ouais ^^




guild wars en force guild wars en force , conflanst , o Jo des jeux video !

Répondre à exterminator de maths

18

allo sav des emission ?, le vendredi 7 décembre 2007 à 10:10:34

Allo ?
- ouais?
_ nan rien !






LOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOL

Répondre à allo sav des emission ?

19

le vrai tueur, le vendredi 7 décembre 2007 à 10:13:28

Bon , tt les messages cons etaien en fet de moi , g fe plein de message sur le forum en prenan plusieur identite differente . je suis hackeur

vremen ct pa dur,ce forum est trop facil a craker

Répondre à le vrai tueur

20

anti wow, le vendredi 7 décembre 2007 à 13:06:12

Wow c pr les looser , c un truk moche ac les traphismes vremen naze


jouer a wow c la ire insulte qon peu fer a un pro gamer ,
wow c linsulte graphique a tout mmorpg

Répondre à anti wow
Introduction à l'algorithmique Notion d'algorithme La mise au point d'un programme informatique se fait en plusieurs étapes. Il s'agit de fournir la solution à un problème, la première étape consiste donc à analyser le problème, c'est-à-dire en cerner les limites et le mettre... www.commentcamarche.net/contents/algo/algointro.php3
Exercices d'algorithme (Résolu) Bonjour, Je souhaite avoir des exercices d'algorithme avec les boucles telles que POUR, TANT QUE, JUSQUE A CE QUE www.commentcamarche.net/forum/affich-3904234-exercices-d-algorithme
Algorithme de cryptage (Résolu) je voudrais bien savoir quels sont les algorithme de cryptage les plus utilisés sur le marché .Merci de votre réponse.ca sera trés important pour moi www.commentcamarche.net/forum/affich-1309644-algorithme-de-cryptage
Vérifier si un nombre entier est un nombre premier en CDéfinition nombre premier Algorithme 1 : les diviseurs compris entre 2 et N-1 seront testés Algorithme 2 : les diviseurs pairs ne seront pas testés, la recherche se limitant aux diviseurs impairs Algorithme 3 : les diviseurs impairs jusqu'à la... www.commentcamarche.net/faq/sujet-7646-verifier-si-un-nombre-entier-est-un-nombre-premier-en-c
Debutant a l'algorithme (Résolu)salut tt je ss un débutant au programmation après une recherche ds le web je vais commence par l'algorithme je veux savoir qu’il est le meilleure livre pour algorithme -anglais ou français - merci pour votre aide www.commentcamarche.net/forum/affich-3026803-debutant-a-l-algorithme
[OCR] Algorithme de reconnaissance (Résolu)Bonjour, Je cherche des methodes (algorithmes) de Reconnaissance Optique des Caractères (OCR) depuis quelques jours, et je vous avoue que j'ai du mal à trouver. Je voulais savoir si certains d'entre vous avaient déjà trouvé de la documentation... www.commentcamarche.net/forum/affich-2775824-ocr-algorithme-de-reconnaissance
Algorithme produit matrice vecteur (Résolu)Bonjour, j'ai besoin du principe de l'algorithme qui permet de faire le produit matriciel entre une latrice et vecteur. www.commentcamarche.net/forum/affich-5034293-algorithme-produit-matrice-vecteur
Le chiffrement avec RSAle système RSA Le premier algorithme de chiffrement à clé publique (chiffrement asymétrique) a été développé par R.Merckle et M.Hellman en 1977. Il fut vite rendu obsolète grâce aux travaux de Shamir, Zippel et Herlestman, de célèbres... www.commentcamarche.net/contents/crypto/rsa.php3
Les caractéristiques du langage PascalDe l'Algorithme ou de l'art de ne pas être trop astucieux Définition du Petit Larousse : Suite finie d'opérations élémentaires constituant un schéma de calcul ou de résolution d'un problème. Ce mot est à connaître et à placer régulièrement dans... www.commentcamarche.net/contents/pascal/pasccarac.php3