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
+2 en segundas
ResponderEliminar