Bonjour,
je veux créer une suite de fichiers .txt qui contiennent tous une même phrase mais j'ai un problème.
Voici mon code :
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
24
25
26
27
28
program quicest
implicit none
character nom(7)
character a,b,c
character n(1:7)
integer i,j,k,s
do i=65,90
	do j=65,90
		do k=65,90
			a=char(i)
			b=char(j)
			c=char(k)
			nom(1)=a
			nom(2)=b
			nom(3)=c
			nom(4)='.'
			nom(5)='t'
			nom(6)='x'
			nom(7)='t'
			open(11,file='temp.txt')
			write(11,*)nom
			open(12,file=nom)
			write(12,*)'salut!!!'
			write(*,*)nom
		enddo
	enddo
enddo
end
Je veux qu'il me crée une suite de fichiers : AAA.txt;AAB.txt;AAC.txt;...
mais, quand je mets open(12,file=nom), il me met seulement la première lettre et pas le .txt.
Pouvez-vous m'indiquer mon erreur s'il vous plait ?

Merci