Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- character error fortran 90
- program calcul
- ! ce programme permet d'effectuer des opérations mathématique de base
- IMPLICIT NONE
- REAL::x,y
- character(len=1)::op
- character(len=16)::op_msg
- write(*,*)"entrer le type d'opération à effectuer(+,-,/,x,*)"
- read(*,*)op
- write(*,*)"entrer le premier nombre de l'opération"
- read(*,*)x
- write(*,*)"entrer le deuxième nombre de l'opération"
- read(*,*)y
- if(op=="+") then
- write(*,*)x,"plus",y,"egale",x+y
- else if(op=="-")then
- write(*,*)x,"moin",y,"egale",x-y
- else if ((op==("*").or.("x")) then
- write(*,*)x,"multiplie par",y,"egale",x*y
- else if (op=="/")then
- write(*,*)x,"divise par",y,"egale",x/y
- else
- write(*,*)"erreur:operation incorrecte"
- end if
- end program calcul
- calculette.f90:21.26:
- else if ((op==("*").or.("x")) then
- 1
- Error: Invalid character in name at (1)
- else if ((op==("*").or.op==("x")) then
Add Comment
Please, Sign In to add comment