TERCEIRO ESTÁGIO - EXEMPLO TESTE FORMAT COM I

PROGRAM TESTE
!LOCAIS DE MEMORIA
INTEGER N
!CÁLCULOS
N = -45606
!SAÍDA DE DADOS
WRITE (*,26) N
WRITE (*,15) N
26 FORMAT(1X, I6)
15 FORMAT(1X, 'N = ', I6)
END PROGRAM