Leer del teclado
1
Abra uno de los archivos FORTRAN y agregue el código siguiente después de la declaración del programa :
carácter
* 4 * 2 xcharacter y
< p > Este código define dos variables de caracteres cuyas longitudes son 4 y 2 , respectivamente . Utilice este formato cuando se definen las variables de carácter
2
Añada el código que aparece a continuación después de esas dos declaraciones de variables : .
Print * , " Por favor introduzca una palabra de cuatro caracteres y dos caracteres palabra " read ( * , 1 ) x , y1 formato (A4 , A2 )
el comunicado leído lee los datos en las direcciones x e y variables. También contiene dos parámetros rodeadas por paréntesis. El primer parámetro , *, dice FORTRAN para aceptar la entrada desde el teclado. El segundo parámetro , 1 , es un número de formato . Apunta a una etiqueta en frente de una declaración que contiene instrucciones de formato . Esa declaración es la instrucción de formato se muestra después de la declaración leída . La instrucción de formato contiene A4 y A2. La letra A es un código de formato que le dice FORTRAN para el tratamiento de los datos como una cadena de texto. Cada código de formato en la lista de parámetros corresponde a una variable en la declaración leída . En este ejemplo, el ordenador lee los primeros cuatro caracteres que escribe y los almacena en la variable x . A continuación, almacena los próximos dos caracteres que escribe en la variable y. La sentencia print muestra una cadena de texto que ayuda a los usuarios a entender lo que le gustaría a entrar .
3
Guardar el programa y ejecutarlo como lo hace normalmente . Cuando se abra una ventana de comandos , escriba " aaaabb " - sin las comillas - en la ventana y pulse el código lee los personajes y asignar "aaaa " a la variable x y " bb" con " Enter". la variable y.
Leer desde archivo
4
Abrir Bloc de notas y pegar el texto que se muestra a continuación en un nuevo documento y guardarlo .
dddd ee
5
Abrir otro archivo de Fortran y pegar estas declaraciones de variables debajo de la declaración del programa :
carácter
* 4 * 2 xcharacter y
6
Agregue la siguiente código después del código que se muestra en el paso anterior :
abierto ( "?" 2 , FILE = ) por ( 2 , 3 ) x , y3 formato (A4 , 1x , A2 ) close (2 )
reemplazar el signo de interrogación con el nombre del archivo de texto guardado . La declaración abierta se abre ese archivo y le asigna un número de unidad a la misma. Ese número es 2 . El comunicado leído parece diferente esta vez. Su segundo parámetro, 3 , se refiere a la instrucción de formato por debajo de ella , pero el primer parámetro se refiere a 2 , el número de archivo asociado con su estado de cuenta abierta. Debido a que estos números coinciden , la declaración leída leerá los datos de ese archivo y guardarlo en la variables x e y .
7
Guardar el programa y ejecutarlo. El programa lee los caracteres de su archivo y los almacena en la variables x e y .