Bonjour
j'ai commencé à utiliser Fortran y a quelques semaines seulement, et étant donné qu'on l'utilise que faire du calcul de physique stats, on a vu que les choses de bases.

Voici mon programme :
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
 
program analyse
implicit none
 
integer i
double precision somme
 
somme=0
open(11,file='valeur_vitesse')
do i=1,188
read(11,*)vitesse(i)
if(vitesse(i).lt.-1000)then
somme=somme+1
endif
enddo
 
print *,'La cumulee pour Vx=-1000 est',somme/188
end
Mon fichier valeur_vitesse est composé d'un unique colonne avec des valeurs de vitesses.

Ce que je voudrais, c'est faire varier la valeur -1000 dans if(vitesse(i).lt.-1000) entre -1000 et 1000.

J'avais essayé de rajouter une boucle pour le faire varier,comme ci-dessous, mais ça a jamais fonctionné.

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
20
21
 
program analyse
implicit none
 
integer i
integer vx
double precision somme
 
somme=0
open(11,file='valeur_vitesse')
do vx=-1000,1000
do i=1,188
read(11,*)vitesse(i)
if(vitesse(i).lt.vx)then
somme=somme+1
endif
enddo
print *,'La cumulee pour Vx=',vx,somme/188
enddo
 
end
J'imagine que ça doit pas être compliqué à faire mais j'ai pas assez de vécu en Fortran pour voir où est le problème

J'espère que vous pourrez me trouver cette solution.
Merci d'avance, Frédérick.