Le prog doit refaire des instructions +haut
Alex D.
-
Alex D. -
Alex D. -
--EN PASCAL, dans L'environnement Delphi7--
ben voilà, je demande à l'utilisateur de faire un choix, s'il répond oui, le programme doit remonter de quelque lignes et refaire l'exécution de celles-ci
le problème, c'est que j'ai aucune idée comment faire ça
Une Exemple de ce que j'ai
-----------------------------
//L'EXÉCUTION recommence ICI//
Writeln ('Combien de cinemas sont ouverts???');
Readln (NbCinemas);
If NbCinemas = 0
Then Begin
Writeln ('Aucun cinema d"ouverts');
Repeat
Writeln ('Voulez-vous regarder pour un autre complexe?(O/N');
Readln (Choix);
Choix := Upcase(Choix);
If Choix = 'O'
Then
//INSÉREZ CODE POUR FAIRE REMONTER ET RECOMMENCER L'EXÉCUTION ICI//
Else If Choix = 'N'
Then
Exit
Else Writeln('Mauvaise touche')
UNTIL (choix='O') OR (choix='N');
End
-----------------
j'espère que vous pouvez m'aider, je suis sûr que c vraiment stupide, mais ça commence à me rendre fou,
Merci d'avance
Alex
ben voilà, je demande à l'utilisateur de faire un choix, s'il répond oui, le programme doit remonter de quelque lignes et refaire l'exécution de celles-ci
le problème, c'est que j'ai aucune idée comment faire ça
Une Exemple de ce que j'ai
-----------------------------
//L'EXÉCUTION recommence ICI//
Writeln ('Combien de cinemas sont ouverts???');
Readln (NbCinemas);
If NbCinemas = 0
Then Begin
Writeln ('Aucun cinema d"ouverts');
Repeat
Writeln ('Voulez-vous regarder pour un autre complexe?(O/N');
Readln (Choix);
Choix := Upcase(Choix);
If Choix = 'O'
Then
//INSÉREZ CODE POUR FAIRE REMONTER ET RECOMMENCER L'EXÉCUTION ICI//
Else If Choix = 'N'
Then
Exit
Else Writeln('Mauvaise touche')
UNTIL (choix='O') OR (choix='N');
End
-----------------
j'espère que vous pouvez m'aider, je suis sûr que c vraiment stupide, mais ça commence à me rendre fou,
Merci d'avance
Alex
A voir également:
- Le prog doit refaire des instructions +haut
- Comment refaire le système d'un ordinateur - Guide
- Windows 11 barre des taches en haut - Guide
- Comment remettre le son haut-parleur ? - Guide
- Immeuble le plus haut du monde - Guide
- Refaire un compte facebook - Guide
3 réponses
Salut,
Tu n'aurais pas fait du Basic par le passe?
Tu en as garde un mauvais reflexe :o)
Tu dois faire un truc du genre (il faut chercher les commandes en Pascal je ne me souvient plus):
. . C'est quoi une signure
\_/
Tu n'aurais pas fait du Basic par le passe?
Tu en as garde un mauvais reflexe :o)
Tu dois faire un truc du genre (il faut chercher les commandes en Pascal je ne me souvient plus):
Do
Writeln ('Combien de cinemas sont ouverts???');
Readln (NbCinemas);
If NbCinemas = 0
Then Begin
Writeln ('Aucun cinema d"ouverts');
Repeat
Writeln ('Voulez-vous regarder pour un autre complexe?(O/N');
Readln (Choix);
Choix := Upcase(Choix);
While (Choix=="O")
Exit
. . C'est quoi une signure
\_/
