TERCEIRO ESTÁGIO - EXEMPLO 2 TESTE FORMAT COM I E /LINHA

PROGRAM TESTE
!LOCAIS DE MEMORIA
INTEGER N, J, K
!CÁLCULOS
J = -45606
K = 3455
N = 678
!SAÍDA DE DADOS
WRITE (*,26) N, J, K
26 FORMAT(1X, 'N = ', I3 / 1X, 'J = ', I6 / 1X, 'K = ', I4)
END PROGRAM