Discussion :

[michaud_rene]

Bonjour,

je veux effectuer le petit bout de programme suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
program identité
character nom*40

print *, 'Quel est votre nom'
read *, nom

end program identité

Mon problème est le suivant :

Si je tape "René Michaud", je n'obtiens que "René" comme résultat. Le programme ne prend pas en compte "Michaud" car il y a un espace entre René et Michaud.

Que dois-je faire pour que ma variable "nom" soit égale à "René Michaud" et non simplement à "René".

Merci d'avance à ceux qui me répondront.

René Michaud

[DaZumba]

Il faut preciser le format de lecture explicitement:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
      program id
      implicit none
 
      character*40 nom
 
      print *, 'Quel est votre nom?'
      read '(A)', nom
 
      print *, nom
 
      end

En plus paranoiaque, on peut aussi limiter la lecture a 40 caracteres maximum, avec le specificateur de format A40.

PS: Il est preferable d'eviter les accents dans le code source, cela peut poser probleme pour certains (vieux) compilateurs qui codent les caracteres sur 7 bits.

[Sylvain Bergeron]

Complément à la réponse de DaZumba.

Quand tu utilises le format * dans « read * », tu utilises un format « libre » dans lequel l'espace sert de séparateur de champs. Comme tu veux intercaller des espaces dans tes chaînes, il est donc préférable d'éviter le format list-directed (*).

Pour les accents, je seconde DaZumba. C'est une très mauvaise habitude : les caractères accentés ne font pas partie du " character set " de Fortran.