hg S’enregistrer Bac Tunisie Algorithmique et programmation : BAC INFORMATIQUE En Tunisie forum informatique Tunisie

Bac Tunisie Algorithmique et programmation : BAC INFORMATIQUE En Tunisie  forum informatique Tunisie Index du Forum

hg Bac Tunisie Algorithmique et programmation TIC réseaux php javascript sql access activités programmation c
hg
FAQ FAQ Rechercher Rechercher Membres Membres Groupes Groupes Profil Profil Se connecter pour vérifier ses messages privés Messages Privés Connexion Connexion


 Forum de l'excellence et l'excellence en innovation 
Pour participer à notre Forum, vous devez
 
inscrire sur notre forum a partir d'ici
 
  NB :
Les membres ''zéro messages'' seront supprimés automatiquement après un nombre de jours donné !!!!
             
   
 
  
forum d'aide informatique : internet, réseau, programmation informatique ...
Exercice Cinq Etoiles (A vos PC)
 
 
Poster un nouveau sujet   Répondre au sujet    Bac Tunisie Algorithmique et programmation : BAC INFORMATIQUE En Tunisie forum informatique Tunisie Index du Forum -> Algorithmique & programmation -> (¯`·._.·[Devoirs et séries']·._.·´¯)
hg Sujet précédent :: Sujet suivant   hd
Auteur Message
KARIMOS
Administrateur

Hors ligne

Inscrit le: 02 Nov 2008
Messages: 1 710
Masculin
Point(s): 5 479
Moyenne de points: 0

Posté le: Mar 1 Déc - 18:00 (2009)    Sujet du message: Exercice Cinq Etoiles (A vos PC) Répondre en citant

PublicitéSupprimer les publicités ?
l y'a trois façons d'écrire 10 sous la forme de somme de quatre entiers impairs choisis dans un ordre croissant pour éviter les répititions :
1 + 1 + 3 + 5 = 10
1 + 1 + 1 + 7 = 10
1 + 3 + 3 + 3 = 10

Faire un programme qui trouve et affiche toutes les façons d'écrire 20 sous la forme de 8 entiers naturels impairs.


 
Revenir en haut
KARIMOS
Administrateur

Hors ligne

Inscrit le: 02 Nov 2008
Messages: 1 710
Masculin
Point(s): 5 479
Moyenne de points: 0

Posté le: Mar 1 Déc - 18:03 (2009)    Sujet du message: Exercice Cinq Etoiles (A vos PC) Répondre en citant

J'explique ma solution étant donné la propriété suivante:
(10*a+b)*(10*c+d)=(10*b+a)*(10*d+c)
On remarque que le développement donne :
99*a*c = 99*b*d <==> a*c = b*d

On remarque aussi que les nombres 5 et 7 ne font pas partie des solutions car :
5*c = 5*d (d'où a devra être égal à b)
7*c = 7*d (d'où a devra être égal à b)
tandis que :
2*c = 4*d ou 6*d ou 8*d (a <> b, c et d aussi)

Dans ma solution j'ai donc écraté ces deux nombre (5 et 7).

Les boucles sont ajustés selon les résultats escomptés.

J'ai trouvé une autre solution qui fait seulement 30 itérations... C'est génial.

Code:
program ex_abcd;
const v : array [1..7] of integer = (1,2,3,4,6,8,9);
var a,b,c,d,cpt,cpt1:integer;
    v1, v2, v3, v4 : integer;
begin
  clrscr;
  cpt := 0; cpt1 := 0;
  for a:=1 to 4 do
    for b:=a+1 to 5 do
      for c:=b+1 to 7 do begin
          d:= (v[a]*v[c]) div v[b];
          cpt := cpt + 1;
          v1 := (10*v[a]+v[b]); v2 := (10*v[c]+d);
          v3 := (10*v[b]+v[a]); v4 := (10*d+v[c]);
          if ((v1*v2)=(v3*v4)) and (b<>c) and (a<>b) and (d<>v[c]) then begin
            cpt1 := cpt1 + 1;
            writeln(v1,' * ',v2,' = ',v3,' * ',v4);
          end;
      end;
  Writeln(cpt:4,cpt1:4);
  readln;
end.





 
Revenir en haut
KARIMOS
Administrateur

Hors ligne

Inscrit le: 02 Nov 2008
Messages: 1 710
Masculin
Point(s): 5 479
Moyenne de points: 0

Posté le: Mar 31 Aoû - 08:43 (2010)    Sujet du message: Exercice Cinq Etoiles (A vos PC) Répondre en citant

Okay

 
Revenir en haut
r.nsiri
recent membre
recent membre

Hors ligne

Inscrit le: 09 Jan 2009
Messages: 262
Masculin
Point(s): 304
Moyenne de points: 0

Posté le: Mer 8 Sep - 13:21 (2010)    Sujet du message: Exercice Cinq Etoiles (A vos PC) Répondre en citant


_________________
Cordialement


 
Revenir en haut
manianis


Hors ligne

Inscrit le: 11 Aoû 2010
Messages: 95
Masculin
Point(s): 102
Moyenne de points: 0

Posté le: Sam 23 Oct - 16:26 (2010)    Sujet du message: Exercice Cinq Etoiles (A vos PC) Répondre en citant

La solution donnée n'est pas pour l'exercice proposé.

En effet, il s'agit d'une des solutions que j'avais proposé sur un des forums  Confused pour un autre exercice.

Je trouve que la solution donnée (ma solution) n'est pas très compréhensible et qu'elle n'est pas très pédagogique. Elle a été donné dans un contexte d'illustration.

Sinon d'autres solutions plus compréhensibles sont disponibles.

merci bien pour le partage.


 
Revenir en haut
manianis


Hors ligne

Inscrit le: 11 Aoû 2010
Messages: 95
Masculin
Point(s): 102
Moyenne de points: 0

Posté le: Sam 23 Oct - 16:28 (2010)    Sujet du message: Exercice Cinq Etoiles (A vos PC) Répondre en citant

Je ré-expédie le même exercice une seconde fois:

Il y a trois façons d'écrire 10 sous la forme de somme de quatre entiers impairs choisis dans un ordre croissant pour éviter les répétitions :
1 + 1 + 3 + 5 = 10
1 + 1 + 1 + 7 = 10
1 + 3 + 3 + 3 = 10

Faire un programme qui trouve et affiche toutes les façons d'écrire 20 sous la forme de 8 entiers naturels impairs.


 
Revenir en haut
manianis


Hors ligne

Inscrit le: 11 Aoû 2010
Messages: 95
Masculin
Point(s): 102
Moyenne de points: 0

Posté le: Sam 23 Oct - 16:32 (2010)    Sujet du message: Exercice Cinq Etoiles (A vos PC) Répondre en citant

Une petite indication:

20 = 1 * 8 + 2 * 6 = 1 + 1 + 1 + 1 + 1 + 1  + 1 + (1 + 2 * 6)
     = 1 + 1 + 1 + 1 + 1 + 1  + (1 + 2) + (1 + 2 * 5)

Vous l'aurez deviné il s'agira de distribuer les (2 * 6) pour trouver toutes les formes


 
Revenir en haut
manianis


Hors ligne

Inscrit le: 11 Aoû 2010
Messages: 95
Masculin
Point(s): 102
Moyenne de points: 0

Posté le: Sam 23 Oct - 17:32 (2010)    Sujet du message: Exercice Cinq Etoiles (A vos PC) Répondre en citant

 Voici la solution la plus simple que je puisse proposer pour l'instant:


Code:
program cinq_etoiles;
var c1,c2,c3,c4,c5,c6 : integer;
begin
  for c1:=6 downto 1 do
    for c2:=c1 downto 0 do
      for c3:=c2 downto 0 do
        for c4:=c3 downto 0 do
          for c5:=c4 downto 0 do
            for c6:=c5 downto 0 do begin
              if ((c1+c2+c3+c4+c5+c6) * 2 + 8 = 20) then
                Writeln(c1*2+1:3,'+',c2*2+1:3,'+',c3*2+1:3,'+',c4*2+1:3,'+',
                        c5*2+1:3,'+',c6*2+1:3,'+',1:3,'+',1:3, ' = ', 20);
            end;
    Readln;
end. 


 
Revenir en haut
KARIMOS
Administrateur

Hors ligne

Inscrit le: 02 Nov 2008
Messages: 1 710
Masculin
Point(s): 5 479
Moyenne de points: 0

Posté le: Sam 23 Oct - 19:40 (2010)    Sujet du message: Exercice Cinq Etoiles (A vos PC) Répondre en citant

MERCI MANIAS POUR VOTRE PROPOSITION .



 
Revenir en haut
manianis


Hors ligne

Inscrit le: 11 Aoû 2010
Messages: 95
Masculin
Point(s): 102
Moyenne de points: 0

Posté le: Sam 23 Oct - 21:08 (2010)    Sujet du message: Exercice Cinq Etoiles (A vos PC) Répondre en citant

Pas de quoi Karimos !!!


Pour l'exercice dont tu as proposé la solution plus haut. L'énoncé est :
On remarque que :
12x42 = 21x24
12x63 = 21x36
12x84 = 21x48
Il y'a 14 produits qui vérifient la propriété :
(10.a+b).(10.c+d) = (10.b+a).(10.d+c)
où a <> b et c<> d
Ecrire un programme qui fait sortir tous ces entiers.


 
Revenir en haut
Contenu Sponsorisé






Posté le: Aujourd’hui à 04:49 (2016)    Sujet du message: Exercice Cinq Etoiles (A vos PC)

 
Revenir en haut
Montrer les messages depuis:   
bg bd
Poster un nouveau sujet   Répondre au sujet    Bac Tunisie Algorithmique et programmation : BAC INFORMATIQUE En Tunisie forum informatique Tunisie Index du Forum -> Algorithmique & programmation -> (¯`·._.·[Devoirs et séries']·._.·´¯) Toutes les heures sont au format GMT + 1 Heure
 
Page 1 sur 1

 
Sauter vers:  
Index | créer forum gratuit | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation