Bonjour,
J'ai un problème avec Gfortran 95. Pour obtenir des coordonnées des points (x, y) différents à chaque lancement du programme, j'ai déjà créé un programme comme suit :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
PROGRAM aleatoire
      IMPLICIT NONE
      INTEGER j
      DOUBLE PRECISION x,y
      j= time()
      CALL srand((MOD(j,1000)))
         x=2*rand(0)-1
     y=2*rand(0)-1
     PRINT*,'DANS ALEA X=',X,'Y=',Y
      END
Mais, il ne marche pas.
Pourriez vous m'aider de corriger ce programme ?
Merci beaucoup.