Salut,
j utilises la boucle do while pour resoudre l equation x=cos x , mais pas de solution , ou est l erreur?
merci



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
 
 
        program ghh
        integer i
        double precision x,xold,err
        xold=1.d0
        err=0.001d0
        i=1
        do while(abs(x-xold).lt.err)
           x=cos(xold)
           xold=x
           i=i+1
           print*,'x=',x
        enddo
        print*,'i=',i
        end