Discussion :

[ould64]

Bonjour,
je voudrais que vous m'aidez a ecrire un prog qui declare et initialise 3 variables ,addition et les multiplie entre elles avant de les permuter.
voila mon programme:
#!/usr/bin/perl -w
#on demande de renrer trois variables a,b,c
print 'entrer a=';
$a = <stdin>;
chomp $a;
print 'entrer b=';
$b = <stdin>;
chomp $b;
print 'entrer c=';
$c = <stdin>;
chomp $c;
#addition
$add = $a+$b+$c;
print "Le resultats de la somme est : $add.\n";
#multiplication
$multi= $a*$b*$c;
print "Le resultats de multiplication est $multi.\n";


je vous remercie en avance

[Jasmine80]

Bonjour,

Utilise les balises CODES, ça sera plus clair.
Je n'utilise jamais directement l'invite de commandes et je ne connais pas bien. Chez moi, le script suivant fonctionne:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
#!/usr/bin/perl -w
#on demande de rentrer trois variables a,b,c
 
use strict;
use warnings;
 
print 'entrez a=';
my $a = <STDIN>;
chomp $a;
print 'entrez b=';
my $b = <STDIN>;
chomp $b;
print 'entrez c=';
my $c = <STDIN>;
chomp $c;
 
print "Valeurs entrees : $a $b et $c\n";
#addition
my $add = $a+$b+$c;
print "Le resultat de la somme est : $add\n";
#multiplication
my $multi= $a*$b*$c;
print "Le resultat de la multiplication est $multi\n";
sleep(100);

Le sleep permet de geler le programme pendant un petit temps afin que la console ne se coupe pas mais il y a certainement un moyen plus propre. Ta console se ferme t'elle automatiquement après l'entrée des valeurs comme chez moi (sous windows)? Si oui, recherche dans la documentation comment résoudre ça.
Si tu ne trouves pas, attends que quelqu'un de plus doué que moi ne s'intéresse à ta question .

Que veux-tu dire par permuter? La somme et le produit resteront les mêmes en permutant tes valeurs.


Jasmine,

[Vespasien]

Demandes à ton prof de définir plus précisement dans quel sens il permute les 3 valeurs. Permutter 2 valeurs signifie que A prend la valeur de B et vis versa mais à trois c'est imprécis.

le titre du post ne serait pas: "faîtes mes devoirs s'il vous plait"

[fyury]

Tu veut faire quoi au juste..

Les permuter c'est a dire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
$a = $b;
$b = $c;
$c = $a;

Enfin si c'est ça tu ne devrait pas avoir de probleme..

permuter !!!

[Jasmine80]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
$a = $b;
$b = $c;
$c = $a;

Ce n'est pas si simple car

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
my $a = 'a';
my $b = 'b';
my $c = 'c';
 
$a = $b;
$b = $c;
$c = $a;
 
print "$a $b $c\n";
# b c b

On perdra la valeur de a.


Jasmine,

[Vespasien]

Tu rajoutes une variable temporaire ou plus sportif:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
$b = $a + $b;
$a = $b - $a;
$b = $b - $a;

Même chose avec $c.

[Schmorgluck]

Sinon, il y a une notation assez simple en Perl :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

($a,$b,$c)=($b,$c,$a);