PROGRAM numerot IMPLICIT NONE INTEGER :: i REAL :: r COMPLEX :: c i = 7.3 r = (1.618034, 0.618034) c = 2.7182818 WRITE (*,*) i, r, c END PROGRAM numerot