Bonjour,

Il y a beaucoup de topics préexistant sur ce sujet mais en fait depuis un petit moment j'essaie de lire un petit fichier texte mais je n'y arrive pas !

Voilà le 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
19
20
21
22
23
  PROGRAM lect
      IMPLICIT NONE
 
      INTEGER n_ligne
      INTEGER n_value
      REAL read_value
      REAL value(10)
      INTEGER i
 
      OPEN(unit=20, file='dd.txt',form='formatted')
      n_ligne = 0
      n_value = 0
      do while (.true.)
        read(unit=20,fmt=*,iostat=n_ligne) read_value
        if (n_ligne .ne. 0) exit
        n_value = n_value + 1
        value(n_value) = read_value
      enddo
      CLOSE(20)
      do i = 1, n_value
        print *, value(i)
        enddo
       end lect
Mais à la compilation il me dit "Array subscript out of bound"...Pouvez vous m'aider ??

Petite précision j'utilise un IDE sous Windows...