Test IF en fortran (débutant)

Résolu
remix1502 -  
Bonjour,
j'essaie d'écrire un test IF en Fortran avec une inégalité.
Ca ne marche pas.

Mon code est :

a=33000./(3.*365.25*24.)

t0=0.
t150=150/a

write (*,*) 'choisir t inférieur à ',t150
READ (*,*) t
IF t = t150 THEN
write (*,*) 'OK'
ENDIF
Configuration: Linux
Firefox 3.0.4

5 réponses

  1. remix1502 Auteur
    j'ai oublié de préciser :
    Fortran 77
    et je ne suis pas non plus sûr de ma syntaxe pour écrire "inférieure ou égale"....

    Alors : une idée ???
    0
    1. remix1502 Auteur
      bon j'ai trouvé "inférieur ou égal"

      Donc ma nouvelle ligne est :

      IF t.LE.t150 THEN

      mais ca ne marche toujours pas.
      j'obtiens comme erreur :

      IF t.LE.t150 THEN
      ^
      Invalid form for IF statement at (^)
      evolution2.for:47:
      a=33000./(3.*365.25*24.)
      1
      evolution2.for:69: (suite) :
      ENDIF
      2
      déclaration à (2) invalide dans le contexte établi par la déclaration à (1)
      0
      1. remix1502 Auteur
        il manquait les parentheses pour définir le if...
        0
        1. ingméca
          je crois qu'il manque la commande ELSE pour boucler le IF après le ENDIF viendra ................je crois
          0
          2. ok
            essai if.t.le.t150 then

            ta essayer demettre end à la fin de tn programme?
            0