permutation de deux valeurs sans utilisation de variable intermédiaire

Aller en bas

permutation de deux valeurs sans utilisation de variable intermédiaire

Message  Admin le Sam 2 Avr - 12:35

[color=red]ALGORITHME/color]
0- Début Permut
1- Lire(A)
2- Lire(B)
3- A <-- A + B
4- B <-- A - B
5- A <-- A - B
6- Ecrire (A, B)
7- Fin Permut

PASCAL
Program Permut;
uses Wincrt;
Var A, B : Integer;
Begin
Write('La première valeur :');
Readln(A);
Write('La deuxième valeur :');
Readln(B);
A : = A + B;
B : = A - B;
A : = A - B;
Write('La première valeur sera :',A);
Write('La deuxième valeur sera :',B);
End.


Admin
Admin

Messages : 137
Date d'inscription : 29/12/2010

Voir le profil de l'utilisateur http://aidescolaire.yoo7.com

Revenir en haut Aller en bas

remarque

Message  Admin le Sam 2 Avr - 12:36

cette méthode de permutation est basée sur l'addition et la soustraction

Admin
Admin

Messages : 137
Date d'inscription : 29/12/2010

Voir le profil de l'utilisateur http://aidescolaire.yoo7.com

Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum