PROGRAM semplice IMPLICIT NONE REAL :: n, m n = 2; m = 3 PRINT*,n," + ",m," = ",(n + m) STOP END PROGRAM semplice