Fortran - Precedencia de operadores

La precedencia del operador determina la agrupación de términos en una expresión. Esto afecta cómo se evalúa una expresión. Algunos operadores tienen mayor precedencia que otros; por ejemplo, el operador de multiplicación tiene mayor precedencia que el operador de suma.

Por ejemplo x = 7 + 3 * 2; aquí, a x se le asigna 13, no 20 porque el operador * tiene mayor prioridad que +, por lo que primero se multiplica por 3 * 2 y luego se suma a 7.

Aquí, los operadores con mayor precedencia aparecen en la parte superior de la tabla, los que tienen la menor prioridad aparecen en la parte inferior. Dentro de una expresión, los operadores de mayor precedencia se evaluarán primero.

Categoría	Operador	Asociatividad
NO lógico y signo negativo	.no. (-)	De izquierda a derecha
Exponenciación	**	De izquierda a derecha
Multiplicativo	* /	De izquierda a derecha
Aditivo	+ -	De izquierda a derecha
Relacional	<<=>> =	De izquierda a derecha
Igualdad	== / =	De izquierda a derecha
Y lógico	.y.	De izquierda a derecha
OR lógico	.o.	De izquierda a derecha
Asignación	=	De derecha a izquierda

Ejemplo

Pruebe el siguiente ejemplo para comprender la precedencia del operador en Fortran:

program precedenceOp
! this program checks logical operators

implicit none  

   ! variable declaration
   integer :: a, b, c, d, e
   
   ! assigning values 
   a = 20   
   b = 10
   c = 15
   d = 5
  
   e = (a + b) * c / d      ! ( 30 * 15 ) / 5
   print *, "Value of (a + b) * c / d is :    ",  e 

   e = ((a + b) * c) / d    ! (30 * 15 ) / 5
   print *, "Value of ((a + b) * c) / d is  : ",  e 

   e = (a + b) * (c / d);   ! (30) * (15/5)
   print *, "Value of (a + b) * (c / d) is  : ",  e 

   e = a + (b * c) / d;     !  20 + (150/5)
   print *, "Value of a + (b * c) / d is  :   " ,  e 
  
end program precedenceOp

Cuando compila y ejecuta el programa anterior, produce el siguiente resultado:

Value of (a + b) * c / d is : 90
Value of ((a + b) * c) / d is : 90
Value of (a + b) * (c / d) is : 90
Value of a + (b * c) / d is : 50

↰ Previous page