Fortran

Electromagnetismo & FORTRAN

8.1.-

Capítulo 8

ENTRADA Y SALIDA CON FORMATO

El presente capitulo va a estar dedicado exclusivamente a presentar las diferentes maneras que FORTRAN ofrece
para leer y escribir datos de cualquier tipo mediante un formato establecido por el programador. Las sentencias
READ*, y PRINT*, ya han sido aplicadas reiteradamente en capítulos precedentes y sufuncionamiento es
conocido. Para ambas sentencias la lectura y escritura se realizan de una manera libre (sin formato) y por lo tanto el
usuario únicamente tiene presente el tipo (real, entero, etc.) del dato que el ordenador espera procesar; sin embargo,
hasta el momento nunca se ha fijado, por ejemplo, cuantos decimales debían aparecer en el resultado o si el dato
leído estaba expresado en formaexponencial. Todos estos aspectos van a ser ahora presentados y una vez finalizado
el capítulo se tendrá un control total sobre la forma de la información de entrada y de salida en un programa
FORTRAN.

•

LECTURA Y ESCRITURA SIN FORMATO

Recordando las sentencias READ* y PRINT*, sin formato, para la lectura y escritura de un numero real por
pantalla tenemos que:
SENTENCIA

ACCIONREAD *,A

•

Leerá una variable A con formato libre por pantalla, el usuario podrá introducir el
dato de manera libre. Esto significa que por ejemplo el valor 1.437 podrá introducirlo
de muchas formas posibles, por ejemplo 1.437 ó 0.1437E+01.

PRINT*,A

•

De igual forma en este caso el ordenador escribirá de manera libre el valor A

Por otro lado las sentencias READ(10,*) yWRITE(10,*) sin formato, para la lectura y escritura de un numero real
por fichero tenemos que:
SENTENCIA

ACCION

READ(10,*)A

•

Leerá una variable A con formato libre en un fichero UNIDAD=10, en el que el
usuario habrá escrito el dato de manera libre.

WRITE(10,*)A

•

De igual forma en este caso el ordenador escribirá de manera libre el valor A en un
fichero UNIDAD=10.

El símbolo*, contenido entre los paréntesis, significa la ausencia de formato en la sentencia que lo contiene, este
símbolo es sustituido por el número de etiqueta que contiene el formato establecido cuando se desea una ejecución
con formato. A continuación se muestra la descripción de ambas sentencias:

•

LECTURA CON FORMATO

Etiqueta

READ(Unidad, Etiqueta)Variable
FORMAT(Código de formato)Unidad: Numero de unidad del fichero en el que se desea
leer, o un *, para leer por pantalla.
Etiqueta: Numero entero que indica la etiqueta en la que se
especifica el formato de lectura. (NOTA: revisar el capítulo
2 para confirmar las columnas permitidas para la escritura
del numero de etiqueta de la línea de sentencia FORMAT)
Código de formato: Aquí se establecen de que forma se
desealeer la variable

Ejemplo:

Grupo de Electromagnetismo

1

Electromagnetismo & FORTRAN
R
2

•

A

D

(

*

,

2

0

)

F

0

E
O

R

M

A

T

(

I

2

Capítulo 8

A

)

ESCRITURA CON FORMATO

Etiqueta

Unidad: Numero de unidad del fichero en el que se desea
escribir, o un *, para escribir en pantalla.
Etiqueta: Numero entero que indicala etiqueta en la que se
especifica el formato de lectura. (NOTA: revisar el capítulo
2 para confirmar las columnas reservadas para la escritura
del numero de etiqueta de la línea de sentencia FORMAT)
Código de formato: Aquí se establecen de que forma se
desea escribir la variable

WRITE(Unidad, Etiqueta)Variable
FORMAT(Código de formato)

Ejemplo:
WR
2

8.2.-

T

E

(

*

,2

0

)

A

F

0

I
R

M

A

T

(

E

9

.

3

)

O

CODIGOS DE FORMATO

Una vez conocida la estructura básica de la lectura y escritura con formato, ahora es preciso conocer de manera
detallada los numerosos códigos de formato que FORTRAN permite para trabajar con los diferentes tipo de datos y
su posicionamiento. En los dos ejemplos anteriores han...