Discussion :

[Jasmine80]

J'ai un problème avec ma boucle while

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
use strict;
use warnings;
 
my $val = 0;
 
while($val < 65 ){
    $val += 3;
 
    if($val > 65){
        $val -= 3;
        last;
    }
 
}
 
# 63 => 66

A chaque passage, j'ajoute 3 jusqu'à ce que j'obtienne le nombre le plus proche mais INFÉRIEUR à 65. Donc, quand j'arrive à 63 si l'ajout suivant fait dépasser le seuil de 65, je ne dois pas effectuer l'opération. Par contre, si l'ajout avait été de 2, j'aurais dû le faire.

Le problème réel est plus compliqué et le j'appelle un sous-programme qui me renvoie une valeur croissante au cours du temps. Je ne peux donc pas faire

Code :

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

1
2
3
4
5
6
7
8
use strict;
use warnings;
 
my $val = 0;
 
while(($val += 3) < 65 ){
 
}

Merci pour votre aide,

[Arioch]

Hello,

le pb que je vois dans ta boucle while, c'est que si ton total > 65, tu retire 3. Tant que total < 65, tu rajoute 3.

Si total = 64, dans la boucle ton programme va rajouter 3, donc total = 67.
Ensuite, tjs dans la boucle, ton programme va retirer 3 puis total est > 65.

Total repasse à 64 et voilà comment on fait mumuse avec une boucle infinie

[Jasmine80]

le pb que je vois dans ta boucle while, c'est que si ton total > 65, tu retire 3. Tant que total < 65, tu rajoute 3.

Si total = 64, dans la boucle ton programme va rajouter 3, donc total = 67.
Ensuite, tjs dans la boucle, ton programme va retirer 3 puis total est > 65.

Total repasse à 64 et voilà comment on fait mumuse avec une boucle infinie

... en effet, d'où le last dans ma boucle if($val > 65)

[Arioch]

oups, je commence à rouiller en Perl

[Carlozi]

Bonjour,

Pourrais-tu expliquer ton problème car là l'énoncé n'est pas clair.

Merci.

Carlozi.

[Jasmine80]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
use strict;
use warnings;
 
my $val = 0;
 
while($val < 65 ){
    $val += 3;
 
    if($val > 65){
        $val -= 3;
        last;
    }
    print "$val\n";
}

Je cherche à simplifier ce script qui affiche les valeurs de 3 à 63 mais sans utiliser while(($val += 3) < 65 ).
Je cherche un moyen de supprimer le if($val > 65) mais je pense que c'est impossible.

[Invité]

Salut,

Pourquoi tu n'utilises pas une boucle for?

Code :

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

1
2
3
4
5
6
7
8
 
# le compteur commence à 3 ($val=3) 
# on boucle tant que la valeur est plus petit que 65 ($val <65)
# on incrémente de 3 à chaque itération ($val += 3)
for($val=3; $val < 65; $val += 3)
{
print $val."\n";
}

[Jasmine80]

Sujet d'introduction :

Le problème réel est plus compliqué et le j'appelle un sous-programme qui me renvoie une valeur croissante au cours du temps. Je ne peux donc pas faire

use strict;
use warnings;

my $val = 0;

while(($val += 3) < 65 ){

}

Merci pour votre aide,

[Invité]

Je cherche à simplifier ce script qui affiche les valeurs de 3 à 63 mais sans utiliser while(($val += 3) < 65 ).

- Ma boucle for affiche des nombres de 3 à 63.
- Je n'utilise pas le while()

Où réside le problème exactement?

[Invité]

Je cherche à simplifier ce script qui affiche les valeurs de 3 à 63 mais sans utiliser while(($val += 3) < 65 ).

- Ma boucle for affiche des nombres de 3 à 63.
- Je n'utilise pas le while(...)

Je cherche un moyen de supprimer le if($val > 65) mais je pense que c'est impossible.

-> Je ne l'utilise pas dans mon code

Où réside le problème exactement?

[Jasmine80]

Le problème réel est plus compliqué et le j'appelle un sous-programme qui me renvoie une valeur croissante au cours du temps.

Voici le code exact

Code :

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

1
2
3
4
5
6
7
8
               while($Tm1<67){
                        $Sonde1 = substr($Demi1,0,$L1);
                        $Tm1 = &Tm($Sonde1,$Ct,$Na);
                        $L1++;
                        if($L1 > 100){
                          $Tm1 = 1000000;
                        }
               }

Il me faudrait donc un $Tm1 le plus proche possible de 67 mais inférieur à celui-ci. A chaque fois que l'on rentre dans la boucle, on augmente la taille de $Sonde1 de 1 et cela provoque également une augmentation de la variable $Tm1 mais cette augmentation est de valeur inconstante.


Merci pour le temps que vous passez à essayer de m'aider mais je pense que ce problème n'a pas d'autre solution que de passer par une opération inverse quand on dépasse le seuil.