svp je voudrais avoir des exercices sur les boucles en pascal merci.

svp je voudrais avoir des exercices sur les boucles en pascal merci. - Delphi/Pascal - Programmation

Marsh Posté le 02-01-2004 à 09:27:58    

:hello:

Reply

Marsh Posté le 02-01-2004 à 09:27:58   

Reply

Marsh Posté le 02-01-2004 à 11:53:49    

bon, je connais pas ton niveau mais etant donné ta question, j'imagine que tu debutes.
 
exo1 :
affiché ceci a l'ecran :
 
24 23 22 21 20 19
18 17 16 15 14 13
12 11 10  9  8  7
 6  5  4  3  2  1
 
en utilisant 2 boucles embriquées.

Reply

Marsh Posté le 02-01-2004 à 11:58:29    

le triangle de pascal, c'est justement un bon exemple

Reply

Marsh Posté le 02-01-2004 à 12:25:00    

taz a écrit :

le triangle de pascal, c'est justement un bon exemple


 
J'y pensais :D

Reply

Marsh Posté le 03-01-2004 à 18:12:41    

voici la solution
program  chi;
var n;cpt:integer;
begin
cpt:=0;
for cpt:=24 downto 1 do
n:=n+cpt;
write (' ',cpt);
end;
readln;readln ;
end.
 mais l'affichage se fait de 24.........1
on n'a pas encore fais le triangle de pascal.commen en resou ce broblem?????merci.


Message édité par bella le 03-01-2004 à 18:40:22
Reply

Marsh Posté le 03-01-2004 à 19:10:18    

voici la solution  
program  chi;  
var n;cpt:integer;  
begin  
cpt:=0;  
for cpt:=24 downto 1 do  
n:=n+cpt;  
write (' ',cpt);  
end;  
readln;readln ;  
end.  
 mais l'affichage se fait de 24.........1  
on n'a pas encore fais le triangle de pascal.commen en resou ce broblem?????merci.

Reply

Marsh Posté le 03-01-2004 à 19:14:40    

bella a écrit :

voici la solution
program  chi;
var n;cpt:integer;
begin
cpt:=0;
for cpt:=24 downto 1 do
n:=n+cpt;
write (' ',cpt);
end;
readln;readln ;
end.
 mais l'affichage se fait de 24.........1
on n'a pas encore fais le triangle de pascal.commen en resou ce broblem?????merci.


 
Tu devais employer 2 boucles imbriquées et afficher sur quatre lignes, non ?
Pourquoi tu déclares la variable n ? elle ne te sert à rien !
Tu as testé ton prog ? Il manque pas un begin quelque part ?
 
-----
 
Encore un p'tit exo :
Ecrire un programme qui demande à l'utilisateur d'entrer 5 (pas plus ni moins) nombres entiers compris entre 0 et 500.
==> Afficher le message "Tapez 5 nombres entiers :"
==> Effectuer la saisie de chaque nombre au bout de la ligne précédente. (effacer avant chaque saisie)
==> Afficher la liste des nombres saisis sur la ligne suivante.
==> A la fin de la saisie : trier ces nombres dans l'ordre décroissant et les afficher sur la ligne suivante, séparés par des " * ".
 

Reply

Marsh Posté le 06-01-2004 à 20:23:00    

http://pinguin007et.free.fr/images/IMG_0547.JPG


Message édité par pinguin007 le 06-01-2004 à 20:24:05

---------------
LoD 4 ever && PWC spirit|Le topak de l'iMP-450|inDATOUNEwe trust
Reply

Marsh Posté le 06-01-2004 à 20:24:26    

l'identation c'est pas mal non plus :o


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 06-01-2004 à 21:23:02    

et éviter de mettre 2x son source aussi :D
 
et les balises [code] ou [fixed] enfin :)


---------------
Whichever format the fan may want to listen is fine with us – vinyl, wax cylinders, shellac, 8-track, iPod, cloud storage, cranial implants – just as long as it’s loud and rockin' (Billy Gibbons, ZZ Top)
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed