problème 2TI2
2 participants
Page 1 sur 1
problème 2TI2
Ecrire une analyse et un algorithme du programme Pascal qui permet d’afficher l’acidité d’une substance à partir du PH et des règles indiquées ci-dessous :
PH = 7 le programme affichera « la substance est neutre »
7 < PH <12 le programme affichera « la substance est alcaline »
PH ≥ 12 le programme affichera « la substance est très alcaline »
2 < PH < 7 le programme affichera « la substance est acide »
PH ≤ 2 le programme affichera « la substance est très acide »
PH = 7 le programme affichera « la substance est neutre »
7 < PH <12 le programme affichera « la substance est alcaline »
PH ≥ 12 le programme affichera « la substance est très alcaline »
2 < PH < 7 le programme affichera « la substance est acide »
PH ≤ 2 le programme affichera « la substance est très acide »
problème Robot 2 TI 2
Un robot conduit une voiture, il peut exécuter 3 actions en fonction de la couleur du feu (feu de croisement), qui sera une variable saisie.
Les 3 actions sont :
Ø S’arrêter si le feu est rouge
Ø Ralentir si le feu est oranger
Ø Passer si le feu est vert
Les 3 actions sont :
Ø S’arrêter si le feu est rouge
Ø Ralentir si le feu est oranger
Ø Passer si le feu est vert
- Analyser le problème Robot
- En déduire un algorithme
- Traduire en Pascal l’algorithme déduit
exercice du ph
spécification
résultat = écrire (''l'acidité du substance est: '',état)
traitement: si ph=7 alors
état(-- ''neutre''
sinon
si (ph>7)et(ph<12)alors
état(--''alcaline''
sinon
si ph>12 alors
état(--''très alcaline''
sinon
si(2<=ph) et (ph<7) alors
état(--''acide''
sinon
si ph<2 alors
état(--''très acide''
fin si
ph=donné("saisir une ph");
TDO
_o_]_t/n__]__rôle_____
ph ] entier]donné
___]______]__________
état] chaine] raiponce
algorithme
0)début xxxx
1)écrire("saisir une ph")
lire (ph)
2)si ph=7 alors
état(-- ''neutre''
sinon
si (ph>7) et (ph<12) alors
état(--''alcaline''
sinon
si ph>12 alors
état(--''très alcaline''
sinon
si (ph>=2) et (ph<7)alors
état(--''acide''
sinon
si ph<2 alors
état(--''très acide''
fin si
3)écrire("l'acidité du substance est: '',état)
4)fin xxxx (Zeroc00l)
résultat = écrire (''l'acidité du substance est: '',état)
traitement: si ph=7 alors
état(-- ''neutre''
sinon
si (ph>7)et(ph<12)alors
état(--''alcaline''
sinon
si ph>12 alors
état(--''très alcaline''
sinon
si(2<=ph) et (ph<7) alors
état(--''acide''
sinon
si ph<2 alors
état(--''très acide''
fin si
ph=donné("saisir une ph");
TDO
_o_]_t/n__]__rôle_____
ph ] entier]donné
___]______]__________
état] chaine] raiponce
algorithme
0)début xxxx
1)écrire("saisir une ph")
lire (ph)
2)si ph=7 alors
état(-- ''neutre''
sinon
si (ph>7) et (ph<12) alors
état(--''alcaline''
sinon
si ph>12 alors
état(--''très alcaline''
sinon
si (ph>=2) et (ph<7)alors
état(--''acide''
sinon
si ph<2 alors
état(--''très acide''
fin si
3)écrire("l'acidité du substance est: '',état)
4)fin xxxx (Zeroc00l)
Dernière édition par Zeroc00l le Jeu 8 Jan - 22:08, édité 2 fois
Zeroc00l- Messages : 4
Date d'inscription : 06/01/2009
Indication
très bien Ali, Mais on a vu aujourd'hui qu'on ne peut pas faire ce type de test 2<=ph<=7, on doit le remplacer par (2<=ph) et (ph<=7). allez j'attend la bonne réponse
photocopie
Un magasin de reprographie facture 50 millimes les dix premières photocopies, 30 millimes les vingt suivantes et 25 millimes au-delà. Ecrivez un algorithme qui demande à l’utilisateur le nombre de photocopies effectuées et qui affiche la facture correspondante.
ex triangle
Écrire un algorithme qui demande 3 nombres à l'utilisateur (A, B, C). Si les nombres A, B, C sont
plus grands que 0 et que A est plus petit que B et que A est plus petit que C et que A est plus
petit que B plus C, écrire "Ces trois nombres peuvent former un triangle" dans le cas où les
conditions ne sont pas correctes, écrire "Ces trois nombres ne peuvent pas former un triangle".
plus grands que 0 et que A est plus petit que B et que A est plus petit que C et que A est plus
petit que B plus C, écrire "Ces trois nombres peuvent former un triangle" dans le cas où les
conditions ne sont pas correctes, écrire "Ces trois nombres ne peuvent pas former un triangle".
reponce de photocopie
algorithme
0) debut xxxx
1)ecrire("donner le nombre des photocopies effectuées")
2)si x<=10 alors
sms(---x*50
sinon
si (x>10) et (x<=30) alors
sms(---x*30
sinon
si x>30 alors
sms(--- x*25
fin si
3)ecrire("le total est",sms)
4)fin xxxx
('bla zero cool')
0) debut xxxx
1)ecrire("donner le nombre des photocopies effectuées")
2)si x<=10 alors
sms(---x*50
sinon
si (x>10) et (x<=30) alors
sms(---x*30
sinon
si x>30 alors
sms(--- x*25
fin si
3)ecrire("le total est",sms)
4)fin xxxx
('bla zero cool')
Zeroc00l- Messages : 4
Date d'inscription : 06/01/2009
ex robot
Spécification
résultat = ecrire("la permission est",sms)
si x(--- "vert" alors
sms(---"continuer"
sinon
si x(---"orongé" alors
sms(---"ralentir"
sinon
si x(---"rouge" alors
sms(---"stop"
fin si
x= donner ("saisire un couleure entre r,v,o ")
objet t/n role
x chaine donner
sms chaine réponce
algorithme
0)debut xxxx
1)x= donner ("saisire un couleure entre r,v,o ")
2)si x(--- "vert" alors
sms(---"continuer"
sinon
si x(---"orongé" alors
sms(---"ralentir"
sinon
si x(---"rouge" alors
sms(---"stop"
fin si
3)ecrire("la permission est",sms)
4)fin xxxx
traduction pascal
program xxxx;
uses wincrt;
var
x,sms:string;
begin
writeln('saisire une couleure entre r,v,o');
read(x);
if x='vert' then
sms:='continue'
else
if x='orongé' then
sms:='ralentire'
else
if x='rouge' then
sms:='stop';
writeln('la permission est',sms);
end. (ba zero cool)
résultat = ecrire("la permission est",sms)
si x(--- "vert" alors
sms(---"continuer"
sinon
si x(---"orongé" alors
sms(---"ralentir"
sinon
si x(---"rouge" alors
sms(---"stop"
fin si
x= donner ("saisire un couleure entre r,v,o ")
objet t/n role
x chaine donner
sms chaine réponce
algorithme
0)debut xxxx
1)x= donner ("saisire un couleure entre r,v,o ")
2)si x(--- "vert" alors
sms(---"continuer"
sinon
si x(---"orongé" alors
sms(---"ralentir"
sinon
si x(---"rouge" alors
sms(---"stop"
fin si
3)ecrire("la permission est",sms)
4)fin xxxx
traduction pascal
program xxxx;
uses wincrt;
var
x,sms:string;
begin
writeln('saisire une couleure entre r,v,o');
read(x);
if x='vert' then
sms:='continue'
else
if x='orongé' then
sms:='ralentire'
else
if x='rouge' then
sms:='stop';
writeln('la permission est',sms);
end. (ba zero cool)
Zeroc00l- Messages : 4
Date d'inscription : 06/01/2009
exercice robot
trés bien Ali tu as résolu l'exercice du RObot, mais attention en algorithmique le test (la condition ) se fait avec un opérateur relationnel(<, >, = <> >= <=)
concernant maintenant l'ex photocopie, supposons que j'ai 26 copies à photocopier je doit payer
50 * 10 + 16 *30
concernant maintenant l'ex photocopie, supposons que j'ai 26 copies à photocopier je doit payer
50 * 10 + 16 *30
Série structure conditionnelle
Exercice n°1 :
Ecrire les instructions Pascal qui permettent d’interpréter ce qui suit :
Lorsque les entiers a et b sont positifs on affecte à l’entier s la somme de a et b plus deux fois la valeur de l’entier a. Dans le cas où a est strictement négatif on affecte à s le produit de a et b moins deux fois la valeur de l’entier b. Si a est multiple de b ou b est multiple de a, déterminer le coefficient multiplicateur.
Exercice n°2 :
Ecrire des programmes Pascal pour :
Déterminer le minimum et le maximum de 2,3 et 4 nombres.
Exercice n°3 :
On considère trois entiers A,B et C ordonnés selon l’ordre croissant tel que A<= B<=C
Soit D un entier à insérer entre (ou avant ou après ) A,B et C de manière à garder l’ordre croissant des données.
Ecrire un programme Pascal qui permet de :
Saisir les données A,B et C et vérifier qu’ils sont ordonnées
Introduire l’entier D
Afficher les 4 données ordonnées
Le programme doit afficher erreur si les 3 données A,B et C ne sont pas ordonnées.
Ecrire les instructions Pascal qui permettent d’interpréter ce qui suit :
Lorsque les entiers a et b sont positifs on affecte à l’entier s la somme de a et b plus deux fois la valeur de l’entier a. Dans le cas où a est strictement négatif on affecte à s le produit de a et b moins deux fois la valeur de l’entier b. Si a est multiple de b ou b est multiple de a, déterminer le coefficient multiplicateur.
Exercice n°2 :
Ecrire des programmes Pascal pour :
Déterminer le minimum et le maximum de 2,3 et 4 nombres.
Exercice n°3 :
On considère trois entiers A,B et C ordonnés selon l’ordre croissant tel que A<= B<=C
Soit D un entier à insérer entre (ou avant ou après ) A,B et C de manière à garder l’ordre croissant des données.
Ecrire un programme Pascal qui permet de :
Saisir les données A,B et C et vérifier qu’ils sont ordonnées
Introduire l’entier D
Afficher les 4 données ordonnées
Le programme doit afficher erreur si les 3 données A,B et C ne sont pas ordonnées.
exercice 1
program xxxx;
uses wincrt;
var
a,b,s:integer;
begin
writeln('saisir deux nombre a et b');
readln(a,b);
if (a>0) and (b>0) then
s:= (3*a)+b
else
if (a<0) and (b<0 )then
s:=(a*b)-(2*b);
if a mod b=0 then
s:= a div b
else
if b mod a =0 then
s:= b div a;
writeln(s);
end.
uses wincrt;
var
a,b,s:integer;
begin
writeln('saisir deux nombre a et b');
readln(a,b);
if (a>0) and (b>0) then
s:= (3*a)+b
else
if (a<0) and (b<0 )then
s:=(a*b)-(2*b);
if a mod b=0 then
s:= a div b
else
if b mod a =0 then
s:= b div a;
writeln(s);
end.
Zeroc00l- Messages : 4
Date d'inscription : 06/01/2009
Page 1 sur 1
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
|
|