programme pour trouver le ppcm et ppcd

Marsh Posté le 14-01-2006 à 12:19:20

bonjours a tous,
alors voila, je dois faire 2 programmes:

le 1er: il doit trouver le ppcm( plus petit communs multiplicateur) et le ppcd ( plus petit communs dénominateur) de 2 nombre, je doit le faire en utilisant seulement une boucle qui fait +1 pour le ppcm et - 1 pour le ppcd :S

exemple du ppcd: si on donne 10 et 15 sa nous donnera 30 car on peut le diviser par 10 et 15.
exemple du ppcm: si on donne 10 et 15 sa nous donnera 5 car 5 est le plus petit multiplicateur qui donne 10 et 15

le 2eme: c'est exactement la même chose sauf sans le +1 et -1 , enfaite le faire avec une autre facon.

et bon vu que je débute vraiement en ada :S( j'ai 15 ans et je commence cette année a apprendre l'ada a l'école) je sait pas trop comment faire :??:

donc si quelqu'un voudrai m'aider se serait sympas

merci d'avance pour vos réponse

Marsh Posté le 14-01-2006 à 12:19:20

Marsh Posté le 14-01-2006 à 13:05:49

Un peu de lecture ? PGCD, PPCM. :-)

---------------
Viendez vous battre à Prologin \o/

Marsh Posté le 14-01-2006 à 14:13:17

Code :

package body Ppcm is
   function Ppcm(Valeur_1, Valeur_2 : Positive) return Positive is
      Var_1 : Positive := Valeur_1;
      Var_2 : Positive := Valeur_2;
   begin
      while (Var_1 /= Var_2) loop
     if (Var_1 > Var_2) then
        Var_2 := (Var_2 + Valeur_2);
     else
        Var_1 := (Var_1 + Valeur_1);
     end if;
      end loop;
      return Var_1;
   end Ppcm;
end Ppcm;

Message cité 1 fois

Marsh Posté le 14-01-2006 à 18:27:35

Les valeurs d'entrées ne sont pas obligatoirement positives, et tu pourrais fournir pgcd dans ton package histoire de pouvoir l'utiliser

---------------
Stick a parrot in a Call of Duty lobby, and you're gonna get a racist parrot. — Cody

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *