hg Register Forum révision Tunisie - Bac Tunisie Algorithmique et programmation , cours, devoir, exercice,edunet

Forum révision Tunisie - Bac Tunisie Algorithmique et programmation , cours, devoir, exercice,edunet Forum Index

hg Revision tunisie scolaire Bac Tunisie Algorithmique et programmation TIC réseaux php javascript sql access activités programmation c
hg
FAQ FAQ Search Search Memberlist Memberlist Usergroups Usergroups Profile Profile Log in to check your private messages Private Messages Log in Log in


 Forum de l'excellence et l'excellence en innovation 
Pour participer à notre Forum révision tunisie , vous devez
 inscrire sur notre forum a partir d'ici
   NB :
Les membres ''zéro messages'' seront supprimés automatiquement après un nombre de jours donné !!!!
             
   
 
  
 
forum d'aide informatique : internet, réseau, programmation informatique ...
exercice+correction
Goto page: 1, 2  > 
 
Post new topic   Reply to topic    Forum révision Tunisie - Bac Tunisie Algorithmique et programmation , cours, devoir, exercice,edunet Forum Index -> Algorithmique & programmation -> Algorithmes récurrents
hg Previous topic :: Next topic   hd
Author Message
KARIMOS
Administrateur

Offline

Joined: 02 Nov 2008
Posts: 711
Masculin
Point(s): 4,448
Moyenne de points: 0

Posted: Tue 1 Dec - 17:47 (2009)    Post subject: exercice+correction Reply with quote

Exercice1:

Soit la suite (U) définie par:
Code:

          U0= 2
          U1= 3
          Un = Un-1+ 2*Un-2              pour tout n >= 2


En supposant que cette suite est croissante, écrire un programme permettant de lire un entier x (x > 2), de vérifier et d'afficher s'il est un terme de la suite U ou non. Dans l'affirmative afficher son rang.

Exercice 2:

Ecrire un programme qui permet de calculer puis d'afficher la racine carrée d'un réel positif x en utilisant la suite suivante:
Code:

          U0 = (1+x)/2
          Un+1 = (Un+ x/Un)/2


Il s'agit de calculer les premiers termes de cette suite jusqu'à ce que la différence entre deux termes successifs devient inferieur ou égale à 10^-4. Le dernier terme calculé est une valeur approchée de √x à 10^-4 près

Exercice 3:

La suite de Fabonacci est définie par :
Code:

          F0= 1
          F1= 1
          Fn= Fn-1 + Fn-2


Ecrire un programme qui permet de saisir un entier naturel n strictement superieur à 1 puis calculer et afficher, pour toutes les valeurs de i inferieur ou égales à n, les valeurs du rapport: Fi/Fi-1

Exercice 4:


Soit la suite (Pi), i impaire définie par:
Code:

          P1= 2
Pi = Pi-2 * (i-1)/i * (i+1)/i



Ecrire un programme qui permet de calculer et d'afficher les termes de la suite P jusqu'à ce que la différence entre deux termes consécutifs devient inferieure ou égale à 10-4

Exercice 5:

Sachant que sin(x) = x/1! - x3/3! + x5/5! - x7/7! + x9/9! - ... Pour x très proche de zéro
Ecrire un programme qui permet d'afficher sin(x) en utilisant la formule ci-dessus.
Le calcul s'arrête quand la différence entre deux termes consécutifs devient inferieure ou égale à 10^-4. la dernière somme calculée est une valeur approchée de sin(x).


 
Revenir en haut
Publicité






Posted: Tue 1 Dec - 17:47 (2009)    Post subject: Publicité

PublicitéSupprimer les publicités ?
 
Revenir en haut
KARIMOS
Administrateur

Offline

Joined: 02 Nov 2008
Posts: 711
Masculin
Point(s): 4,448
Moyenne de points: 0

Posted: Tue 1 Dec - 17:47 (2009)    Post subject: exercice+correction Reply with quote

voila la correction des exercices 1 & 2

on commence par l'exercice 1:

Code:


program ex1;

uses wincrt;

var x,u,r:integer;









procedure saisie (var x:integer);

 begin

  repeat

    writeln ('saisir l''entier x');

    readln (x);

  until (x>2);

 end;





procedure calcul (x:integer; var
u,r:integer);

var uap,up:integer;

begin

r:=2;

up:=2;

u:= 3;

  repeat

    uap := up;

    up := u;

    u:= up+ 2 * uap;

    r:= r+1

  until (u>=x);

end;









begin

  saisie (x);

  calcul (x,u,r);

  if (x=r) then

      writeln (x,' un terme de la suite')

  else

      writeln (x,' n''est pas un terme de
la suite');

end.


 
Revenir en haut
KARIMOS
Administrateur

Offline

Joined: 02 Nov 2008
Posts: 711
Masculin
Point(s): 4,448
Moyenne de points: 0

Posted: Tue 1 Dec - 17:48 (2009)    Post subject: exercice+correction Reply with quote

voici l'exercice 2:

Code:


program ex2;

uses wincrt;

var x,r:real;









procedure saisie (var x:real);

begin

  repeat

    writeln ('saisir un reel positif');

    readln (x);

  until (x>0);

end;





function racine (x:real):real;

var u,up:real;

begin

  u:= (1+x)/2;

    repeat

      up := u;

        u:= (up + x / up)/2;

    until (abs(u-up) <= 0.0001);

racine := u;

end;





begin

  saisie (x);

  r:= racine(x);

  writeln(r:5:2,' est la racine carée
de ',x:5:2);

end.



 
Revenir en haut
KARIMOS
Administrateur

Offline

Joined: 02 Nov 2008
Posts: 711
Masculin
Point(s): 4,448
Moyenne de points: 0

Posted: Tue 1 Dec - 17:48 (2009)    Post subject: exercice+correction Reply with quote

la solution de l'exersice N° 3


program ex3;
uses wincrt;

var
f0,f1,fn,i,n:integer;
procedure saisie(var n:integer);
begin
repeat
writeln('donner u, entier > 1');
readln(n);
until (n>1);
end;

procedure calcul(n:integer);
var i:integer;
begin
for i:=1 to n do
begin
fn:=f0+f1;
writeln('le ',i,' rapport est ',(fn/f1):0:2);
f0:=f1;
f1:=fn;
end;
end;
begin
f0:=1;
f1:=1;
saisie(n);
calcul(n);
end.


 
Revenir en haut
ayari.zohra


Offline

Joined: 09 Dec 2009
Posts: 4
Féminin
Point(s): 4
Moyenne de points: 0

Posted: Thu 14 Jan - 11:25 (2010)    Post subject: exercice+correction Reply with quote

merci pour le partage

 
Revenir en haut
skilatchi


Offline

Joined: 20 Oct 2009
Posts: 1
Point(s): 3
Moyenne de points: 0

Posted: Fri 15 Jan - 19:27 (2010)    Post subject: exercice+correction Reply with quote

merci  Okay

 
Revenir en haut
mekkaoui_rakya
recent membre
recent membre

Offline

Joined: 15 Jan 2010
Posts: 11
Féminin
Point(s): 11
Moyenne de points: 0

Posted: Fri 15 Jan - 20:18 (2010)    Post subject: exercice+correction Reply with quote

c bien merci Wink

 
Revenir en haut
staticroof


Offline

Joined: 21 Nov 2009
Posts: 7
Point(s): 6
Moyenne de points: 0

Posted: Fri 15 Jan - 22:27 (2010)    Post subject: exercice+correction Reply with quote

merci beaucoup Okay

 
Revenir en haut
bhouss
recent membre
recent membre

Offline

Joined: 16 Apr 2009
Posts: 11
Masculin
Point(s): 19
Moyenne de points: 0

Posted: Mon 18 Jan - 20:58 (2010)    Post subject: exercice+correction Reply with quote

tunis merci

 
Revenir en haut
med_charfi


Offline

Joined: 17 Jan 2010
Posts: 4
Point(s): 4
Moyenne de points: 0

Posted: Tue 19 Jan - 11:53 (2010)    Post subject: exercice+correction Reply with quote

merci bq Okay Okay Okay Okay

 
Revenir en haut
taher05


Offline

Joined: 25 Mar 2010
Posts: 1
Masculin
Point(s): 1
Moyenne de points: 0

Posted: Thu 25 Mar - 17:52 (2010)    Post subject: exercice+correction Reply with quote

merci  Okay Okay Okay Okay

 
Revenir en haut
sofien


Offline

Joined: 19 Aug 2010
Posts: 1
Masculin
Point(s): 1
Moyenne de points: 0

Posted: Thu 19 Aug - 15:01 (2010)    Post subject: exercice+correction Reply with quote

merci         Okay Okay Okay     Okay Okay Okay    Okay Okay Okay

 
Revenir en haut
r.nsiri
recent membre
recent membre

Offline

Joined: 09 Jan 2009
Posts: 231
Masculin
Point(s): 273
Moyenne de points: 0

Posted: Sat 9 Oct - 15:00 (2010)    Post subject: exercice+correction Reply with quote

Okay Okay Okay Okay Okay Okay Okay Okay Okay
_________________
Cordialement


 
Revenir en haut
med_med


Offline

Joined: 12 Oct 2010
Posts: 1
Point(s): 1
Moyenne de points: 0

Posted: Tue 1 Mar - 11:14 (2011)    Post subject: exercice+correction Reply with quote

merciiiiiiiiiiiiiiiiiiiiiii

 
Revenir en haut
emily


Offline

Joined: 08 Apr 2011
Posts: 6
Point(s): 6
Moyenne de points: 0

Posted: Mon 11 Apr - 11:37 (2011)    Post subject: exercice+correction Reply with quote

bravo, c'est très interessant Laughing

 
Revenir en haut
Display posts from previous:   
bg bd
Post new topic   Reply to topic    Forum révision Tunisie - Bac Tunisie Algorithmique et programmation , cours, devoir, exercice,edunet Forum Index -> Algorithmique & programmation -> Algorithmes récurrents All times are GMT + 1 Hour
Goto page: 1, 2  > 
Page 1 of 2

 
Jump to:  
Index | Make forum | Free support forum | Free forums directory | Report a violation | Cookies | Charte | Conditions générales d'utilisation