El Proyecto | Sobre nosotros | Contribuir | Donaciones | Licencia
HOME Mis cursos Finalizados
◄ Anterior
◄

Uso de Fortran en OpenVMS

Siguiente ►
►

Introducción

Fortran (FORmula TRANslation) es uno de los lenguajes de programación más antiguos y sigue siendo ampliamente utilizado en aplicaciones científicas y de ingeniería. En OpenVMS, Fortran es una opción poderosa para desarrollar aplicaciones de alto rendimiento. Este módulo cubrirá los aspectos esenciales de la programación en Fortran dentro del entorno OpenVMS.

Contenido

  1. Configuración del Entorno de Desarrollo
  2. Estructura Básica de un Programa Fortran
  3. Compilación y Ejecución de Programas Fortran
  4. Manejo de Archivos en Fortran
  5. Interacción con Servicios del Sistema
  6. Ejercicios Prácticos

Configuración del Entorno de Desarrollo

Antes de comenzar a programar en Fortran en OpenVMS, es necesario configurar el entorno de desarrollo.

Instalación del Compilador Fortran

  1. Verificar la Instalación del Compilador:

    $ FORTRAN /VERSION

    Este comando muestra la versión del compilador Fortran instalado en el sistema.

  2. Instalar el Compilador (si no está instalado):

    • Consulte la documentación de OpenVMS para obtener instrucciones sobre cómo instalar el compilador Fortran.

Configuración del Entorno

  1. Configurar Variables de Entorno: 
    $ DEFINE FORTRAN SYS$SYSTEM:FORTRAN.EXE

Estructura Básica de un Programa Fortran

Un programa Fortran típico tiene la siguiente estructura:

PROGRAM HelloWorld
  PRINT *, 'Hello, World!'
END PROGRAM HelloWorld

Explicación del Código

  • PROGRAM HelloWorld: Define el inicio del programa y su nombre.
  • PRINT *, 'Hello, World!': Imprime el texto "Hello, World!" en la consola.
  • END PROGRAM HelloWorld: Marca el final del programa.

Compilación y Ejecución de Programas Fortran

Compilación

Para compilar un programa Fortran en OpenVMS, use el siguiente comando:

$ FORTRAN HelloWorld.FOR

Este comando genera un archivo objeto (HelloWorld.OBJ).

Enlace

Para enlazar el archivo objeto y crear un ejecutable, use:

$ LINK HelloWorld

Ejecución

Para ejecutar el programa, simplemente escriba:

$ RUN HelloWorld

Manejo de Archivos en Fortran

Fortran proporciona varias formas de manejar archivos. Aquí hay un ejemplo básico de lectura y escritura de archivos:

Escritura en un Archivo

PROGRAM WriteFile
  INTEGER :: i
  OPEN(UNIT=10, FILE='output.txt', STATUS='NEW')
  DO i = 1, 10
    WRITE(10, *) 'Line number ', i
  END DO
  CLOSE(10)
END PROGRAM WriteFile

Lectura de un Archivo

PROGRAM ReadFile
  INTEGER :: i
  CHARACTER(LEN=20) :: line
  OPEN(UNIT=10, FILE='output.txt', STATUS='OLD')
  DO
    READ(10, *, END=100) line
    PRINT *, line
  END DO
100 CLOSE(10)
END PROGRAM ReadFile

Interacción con Servicios del Sistema

Fortran en OpenVMS puede interactuar con servicios del sistema utilizando llamadas a funciones del sistema. Aquí hay un ejemplo de cómo obtener la fecha y hora del sistema:

PROGRAM GetDateTime
  CHARACTER(LEN=20) :: datetime
  CALL LIB$DATE_TIME(datetime)
  PRINT *, 'Current date and time: ', datetime
END PROGRAM GetDateTime

Ejercicios Prácticos

Ejercicio 1: Programa Básico

Objetivo: Escribir un programa que calcule la suma de los primeros 100 números enteros.

Código:

PROGRAM Sum100
  INTEGER :: i, sum
  sum = 0
  DO i = 1, 100
    sum = sum + i
  END DO
  PRINT *, 'The sum of the first 100 integers is ', sum
END PROGRAM Sum100

Ejercicio 2: Manejo de Archivos

Objetivo: Escribir un programa que lea números de un archivo y calcule su promedio.

Código:

PROGRAM AverageFromFile
  INTEGER :: num, count
  REAL :: sum, average
  sum = 0.0
  count = 0
  OPEN(UNIT=10, FILE='numbers.txt', STATUS='OLD')
  DO
    READ(10, *, END=100) num
    sum = sum + num
    count = count + 1
  END DO
100 CLOSE(10)
  IF (count > 0) THEN
    average = sum / count
    PRINT *, 'The average is ', average
  ELSE
    PRINT *, 'No numbers to read.'
  END IF
END PROGRAM AverageFromFile

Conclusión

En este módulo, hemos cubierto los aspectos básicos de la programación en Fortran en OpenVMS, incluyendo la configuración del entorno, la estructura de un programa Fortran, la compilación y ejecución de programas, el manejo de archivos y la interacción con servicios del sistema. Los ejercicios prácticos proporcionados deben ayudar a reforzar los conceptos aprendidos. En el siguiente módulo, exploraremos el uso de COBOL en OpenVMS.

◄ Anterior
◄
Siguiente ►
►

Curso de Programación en OpenVMS

Módulo 1: Introducción a OpenVMS

Módulo 2: Comandos Básicos de OpenVMS

Módulo 3: Sistema de Archivos de OpenVMS

Módulo 4: Scripting con DCL

Módulo 5: Gestión del Sistema OpenVMS

Módulo 6: Redes en OpenVMS

Módulo 7: Programación Avanzada en OpenVMS

Módulo 8: Clustering en OpenVMS

Módulo 9: Seguridad en OpenVMS

Módulo 10: Solución de Problemas y Optimización

El Proyecto | Sobre nosotros | Contribuir | Donaciones | Licencia
© Copyright 2024. Todos los derechos reservados