miércoles, 24 de noviembre de 2010

LENGUAJE DE PROGRAMACIÓN FORTRAN

AQUÍ LES TRAIGO OTRO PROGRAMA HECHO EN FORTRAN
ESPERO QUE LO DISFRUTEN:


EN ESTE PROGRAMITA DE FORTRAN SE UTILIZARA LAS SUBRUTINAS Y DE QUE
FORMA LLAMARLAS CON UN SENCILLO EJEMPLO DISFRÚTENLO:
AQUÍ LES MUESTRO UN PROGRAMA DE FORTRAN UTILIZANDO SUBRUTINAS





     PROGRAM  PROMEDIOS
      REAL N, sumatoria, Y, I  //DECLARAMOS VARIABLE
      WRITE (*,*) "CUANTAS CALIFICACIONES SON: " 
      READ (*,*) N
      CALL SUMA (N, sumatoria) // AQUÍ SE LLAMA A LA FUNCIÓN DE SUMA
      CALL PROM (sumatoria) // AQUÍ SE LLAMA A LA FUNCIÓN DE PROM
      WRITE(*,*) "EL PROMEDIO ES DE: "
      PRINT *, promedio
      END

      SUBROUTINE SUMA (N, sumatoria) // AQUÍ SE INICIA LA SUBROTINA DE SUMA Y ENTRE 
LOS PARÉNTESIS RECIBEN LOS VALORES Y LOS ENVÍA A LA FUNCIÓN PRINCIPAL
      REAL Y, I,sumatoria,N
      DO I = 1, N
             WRITE(*,*) "DAME LA CALIFICACION QUE SIGUE"
             READ(*,*) Y
             sumatoria = sumatoria + Y
      END DO
      END
    
      SUBROUTINE PROM (sumatoria) // AQUÍ INICIA LA DE PROM IGUAL DE LA MISMA MANERA RECIBE LA INFORMACIÓN DE LA VARIABLE sumatoria POR MEDIO DEL PARÉNTESIS
      REAL promedio
      promedio = sumatoria/ N
      END
ESPERO DE QUE SEA DE SU AGRADO

AQUÍ LES DEJO UNA PAGINA O UN TUTORIAL MUY BUENO DE FORTRAN DONDE ME GUIÉ
http://www.fismat.umich.mx/mn1/tutor_fort

    

1 comentario: