Discussion :

[MEKKADRA]

Bonjour,

J'ai un problème simple, qui est d'écrire un programme (langage Fortran). La question est la suivante:

Écrire un programme HORNER qui calcule la valeur du polynôme de degré (N-1) :



Merci d'avance !

[Obsidian]

Bonjour et bienvenue.

On peut t'aider mais on ne fera pas ton travail à ta place. Montre-nous ce que tu as écrit jusqu'ici et dis-nous sur quel point tu bloques en particulier.

[MEKKADRA]

je fait ca mais sa marche pas je ne sai pas quel est la probleme . . .
il n'ya pas des errors mais il ne travaille pas la solution d'un polynome de degré(n-1)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
program horner
	parameter (max=50)
	doubleprecision a(max)
 
	write(*,*)('donner la degrer de la polynom')
	read(*,*)n
	write(*,*)('donner la valeur de x')
	read(*,*)x
	do i=0,n
	write(*,*)('donner la coifficient a'),n-i
	read(*,*)a(n-i) 
	enddo
	n=n-1
	b=a(n)
	do i=1,n
	b=b*x+a(n-i)
	enddo
	write(*,*)b
	end

[Bob_Tom]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
	do i=0,n
	write(*,*)('donner la coifficient a'),n-i
	read(*,*)a(n-i) 
	enddo

Salut

un première erreur que j'ai vu les tableau en fortran son définie de 1,N et non pas de 0 à N
il y a surement un problème dans ta boucle do quand i = n

[François L.]

Utiliser:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
doubleprecision a(0:max)

pour éviter le problème soulevé par Bob_Tom et avoir un polynôme de degré N.
A titre purement personnel, je n'aime pas numéroter mes tableaux à partir d'autre chose que 1, mais il s'agit là de mes petites phobies à moi.

Ceci mis à part, ça devrait fonctionner

[MEKKADRA]

merci pour l'aide ....
mai sa marche rien
je saie qu'il y a un errer dans la dernière boucle

[Bob_Tom]

quand tu ca marche pas c'est ca compile pas ou tu n'a pas le bon resultat. si c'est ca compile pas qu'elle est l'erreur?

[Bob_Tom]

je pence aussi que quand on débute (et meme après) il est preferable de déclarer toutes ses variables cela permet d'etre plus clair pour toi.
je te conseille d'utiliser en début de programme

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
program toto
implicite none        !enlève les types implicite des variable
double precision X
integer i,j
.....

[François L.]

je pence aussi que quand on débute (et meme après) il est preferable de déclarer toutes ses variables cela permet d'etre plus clair pour toi.
je te conseille d'utiliser en début de programme
(snip)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
IMPLICIT NONE

Il n'y a pas de E à IMPLICIT...

Pour la boucle, qu'est ce qui ne "marche" pas?
Pourquoi n=n-1?

Essaie de réfléchir avec un polynôme d'ordre 0, puis 1.
Ca devrait te permettre de trouver l'erreur