Programme de calcul d'intégrales - Delphi/Pascal - Programmation
Marsh Posté le 25-02-2004 à 10:45:07
on peut faire comme ça: 
 
l'integrale de 0 a 10 (par exemple) d'une fonction (disons 3*x^2) 
est: F(x1)-F(x0)+F(x2)-F(x1)+ ..F(xn)-F(xn-1) = F(xn)-F(x0) 
si tu connais F(x0) alors   
F(x1)=pas*f(x0)+ F(x0)   (integrale au sens de Rieman entre x1 et x0;  x1=x0 + pas) 
et plus generalement: F(xn+1)= pas* f(x) + F(xn) 
on construit donc de proche en proche F(x1), F(x2),.... 
 
x=x0 ; F(x0) ; pas    sont connus. 
 for i:= t0 1200 do begin  ( 1200 points par 1200) 
   canvas.pixels[600+ round(60*x), 600- round(y)]:=clblack; 
   temp=y;y:=3*x*x;y:=pas*y + temp; x:=x+ pas; 
end; 
 
si pas est suffisamment petit alors on obtient bien le tracé de l'intégrale x^3.
Marsh Posté le 25-02-2004 à 10:46:21
| nono30 a écrit :   | 
 
 
listbox1.Items.LoadFromFile('c:\bidule.txt');
Marsh Posté le 25-02-2004 à 14:03:50
merci drac pou les explications. 
merci oci a antp, mais ça ne s'affiche toujours pas dans ma TListbox, je comprends pas pourquoi!
Marsh Posté le 04-03-2004 à 22:58:03
comment on fait pour renvoyer un résultat ds une zone edit?
Marsh Posté le 04-03-2004 à 23:30:30
Edit1.Text := Resultat; 
 
Avec les fonctions IntToStr, FloatToStr, FormatFloat, Format, et plein d'autres pour transformer des variables en chaînes.
Marsh Posté le 24-02-2004 à 17:12:15
Salut,
je cherche (par hasard) si kelkun a dans son disque dur un programme qui pourrait correspondre au sujet du post ou kekke chose de semblable.
sinon c pa grave il va falloir que je bosse!!!
PB:
- je n'arrive pas à afficher le contenu d'un fichier dans une TListbox
- je n'arrive pas à tracer ma fonction connaissant la fonction les bornes d'intégrations et le pas
Si kelkun peut m'aider kil n'hésite pas!
Merci A+