Visites aujourd'hui : 1266 Top visites par jour : 1266 Le 16 février 2025 Visiteurs en ligne: 13 |
![]() |
![]() |
||
![]() |
|||
![]() |
la structure itérative (Pour)
Corrigé : Rappel : ![]()
gotoxy(x,y) Exemple: ![]() |
program ex1; uses wincrt; var nom:string; i:integer; j:longint; begin Writeln('Donner votre nom :');readln(nom); for i:=80-length(nom)+1 downto 1 do {parcours de x avec i de 80-length(nom)+1 à i=1} begin clrscr; {Pour effacer tout l'écran } gotoxy(i,12); {y est fixe =12 pour afficher sur la ligne du milieu de l'écran.} write(nom); for j:=1 to 5000000 do ; { Pour générer un ralentissement } { Dans les autres version du Pascal, On peut aussi utiliser delay} { Delay(nb de millisecondes) Exemple : delay(1000) ; } end; end. |
Exemple d'exécution :
Date d'ajout de la page: 10/11/2013 Dernière mise à jour de la page: 10/11/2013 |
Dernière modification: 16 février 2025
K i t e b . n e t © 2008-2025