Test IF en fortran (débutant)

Résolu
remix1502 Messages postés 64 Statut Membre -  
 ok -
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 Messages postés 64 Statut Membre 1
     
    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
  2. remix1502 Messages postés 64 Statut Membre 1
     
    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
  3. remix1502 Messages postés 64 Statut Membre 1
     
    il manquait les parentheses pour définir le if...
    0
  4. ingméca Messages postés 6 Statut Membre
     
    je crois qu'il manque la commande ELSE pour boucler le IF après le ENDIF viendra ................je crois
    0

  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. ok
     
    essai if.t.le.t150 then

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