programme pour trouver le ppcm et ppcd

programme pour trouver le ppcm et ppcd - Ada - Programmation

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 :D  
 
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  :)

Reply

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

Reply

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

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


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

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

Code :
  1. package body Ppcm is
  2.   function Ppcm(Valeur_1, Valeur_2 : Positive) return Positive is
  3.      Var_1 : Positive := Valeur_1;
  4.      Var_2 : Positive := Valeur_2;
  5.   begin
  6.      while (Var_1 /= Var_2) loop
  7.      if (Var_1 > Var_2) then
  8.         Var_2 := (Var_2 + Valeur_2);
  9.      else
  10.         Var_1 := (Var_1 + Valeur_1);
  11.      end if;
  12.      end loop;
  13.      return Var_1;
  14.   end Ppcm;
  15. end Ppcm;

Reply

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 :o


---------------
I mean, true, a cancer will probably destroy its host organism. But what about the cells whose mutations allow them to think outside the box, and replicate and expand beyond their wildest dreams by throwing away the limits imposed by overbearing genetic r
Reply

Sujets relatifs:

Leave a Replay

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