program formatos ! se declaran 2 enteros. ! se muestra cada uno con formatos distintos. INTEGER :: A = 12, B = 600 PRINT '(I2, 2I5.3)', A, B PRINT '(I6)', A ! formatos logicos: end