hg S’enregistrer 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 Index du Forum

hg Revision tunisie scolaire Bac Tunisie Algorithmique et programmation TIC réseaux php javascript sql access activités programmation c
hg
FAQ FAQ Rechercher Rechercher Membres Membres Groupes Groupes Profil Profil Se connecter pour vérifier ses messages privés Messages Privés Connexion Connexion


 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 ...
Calcule d'intégrale
 
 
Poster un nouveau sujet   Répondre au sujet    Forum révision Tunisie - Bac Tunisie Algorithmique et programmation , cours, devoir, exercice,edunet Index du Forum -> Algorithmique & programmation -> Algorithmes d'approximations
hg Sujet précédent :: Sujet suivant   hd
Auteur Message
KARIMOS
Administrateur

Hors ligne

Inscrit le: 02 Nov 2008
Messages: 1 715
Masculin
Point(s): 5 484
Moyenne de points: 0

Posté le: Ven 26 Fév - 14:33 (2010)    Sujet du message: Calcule d'intégrale Répondre en citant

Ecrire un programme qui permet de donner une valeur approchée de l'intégrale d'une fonction par la méthode des rectangles.La fonction f est défini par: f(x)=1/1+x² .

correction
Code:

program integration_rectangle;
uses wincrt;
var k,a,b:real;
     n:integer;
 
function f(x:real):real;
begin
f:=1/(1+x*x)
end;
 
function rectangle(a,b:real;n:integer):real;
var k:integer;
    h,x,s:real;
begin
 s:=0.0;
    h:=(b-a)/n;
      x:=a+h/2;
         for k:=1 to n do
           begin
            s:=s+f(x);
             x:=x+h;
          end;
rectangle:=s*h;
end;
 
 {programme principale}
 begin
  writeln('Intégration par la méthode des rectangles');
 write('Borne inférieur(a): ');
 read(a);
 writeln;
 
 repeat
 write('Borne supérieur(b): ');
 read(b);
 writeln;
 until b>a;
 
  repeat
 write('Nombre d"intervalle: ');
 read(n);
 writeln;
 until n>0;
 k:=rectangle(a,b,n);
 writeln('Valeur de l"intégrale est = ',k);
 end.


 
Revenir en haut
Publicité






Posté le: Ven 26 Fév - 14:33 (2010)    Sujet du message: Publicité

PublicitéSupprimer les publicités ?
 
Revenir en haut
Meday_tic


Hors ligne

Inscrit le: 01 Mar 2010
Messages: 3
Point(s): 3
Moyenne de points: 0

Posté le: Lun 1 Mar - 17:33 (2010)    Sujet du message: Calcule d'intégrale Répondre en citant

************* Merci bouceaup **********

 
Revenir en haut
mba


Hors ligne

Inscrit le: 11 Fév 2010
Messages: 5
Point(s): 5
Moyenne de points: 0

Posté le: Ven 2 Avr - 20:47 (2010)    Sujet du message: Calcule d'intégrale Répondre en citant

 good Wink

 
Revenir en haut
bibani


Hors ligne

Inscrit le: 21 Fév 2009
Messages: 2
Masculin
Point(s): 9
Moyenne de points: 0

Posté le: Sam 3 Avr - 10:24 (2010)    Sujet du message: Calcule d'intégrale Répondre en citant

good good good good good good good good good good good



 
Revenir en haut
realsouma


Hors ligne

Inscrit le: 10 Fév 2010
Messages: 4
Point(s): 4
Moyenne de points: 0

Posté le: Lun 12 Avr - 23:11 (2010)    Sujet du message: Calcule d'intégrale Répondre en citant

salut bon stp eske vou pouvez me donné l'analyse de ce programme !!!! merci en avance    Smile Smile

 
Revenir en haut
aloulou


Hors ligne

Inscrit le: 17 Mar 2010
Messages: 8
Masculin
Point(s): 8
Moyenne de points: 0

Posté le: Dim 2 Mai - 20:26 (2010)    Sujet du message: Calcule d'intégrale Répondre en citant

ya realsouma , hathi 7eret feha ? wa3

 
Revenir en haut
Contenu Sponsorisé






Posté le: Aujourd’hui à 02:32 (2017)    Sujet du message: Calcule d'intégrale

 
Revenir en haut
Montrer les messages depuis:   
bg bd
Poster un nouveau sujet   Répondre au sujet    Forum révision Tunisie - Bac Tunisie Algorithmique et programmation , cours, devoir, exercice,edunet Index du Forum -> Algorithmique & programmation -> Algorithmes d'approximations Toutes les heures sont au format GMT + 1 Heure
 
Page 1 sur 1

 
Sauter vers:  
Index | créer forum gratuit | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation