ffff

1

Matem´ticas - Curso 2007/08 - M´todos Num´ricos I
a
e
e
Pr´cticas de FORTRAN - SESION 1
a

Pr´ctica 1:
a
Vamos a escribir un programa en FORTRAN para resolver una ecuaci´n
o
desegundo grado:
ax2 + bx + c = 0, a, b, c ∈ R.
Datos de entrada: Coeficientes del polinomio: a, b, c.
Datos de salida: Las ra´ de la ecuaci´n: x =
ıces
o

√
−b± b2 −4ac
2a

Programa

10

INICIODEL PROGRAMA
DECLARACION DE VARIABLES
LEER a (Coeficiente de x2)
SI a = 0 ENTONCES
ESCRIBIR el mensaje: a debe ser distinto de 0
IR a 10
EN OTRO CASO (a = 0) Continuar
LEER b y c
dis = b2 −4ac
SI dis > 0 ENTONCES
ESCRIBIR el mensaje: Dos ra´ reales distintas
ıces
ESCRIBIR las ra´
ıces.
IR a 20
SI dis < 0 ENTONCES
ESCRIBIR el mensaje: Dos ra´ complejas
ıces
ESCRIBIR las ra´ıces.
IR a 20
EN OTRO CASO (o sea, si dis = 0) ENTONCES

FacMat - Curso 2007/08 - M´todos Num´ricos I - Pr´cticas de FORTRAN - Sesi´n 1
e
e
a
o

20

2

ESCRIBIR el mensaje ”Una ra´ realdoble”
ız
ESCRIBIR la ra´
ız.
IR a 20
ESCRIBIR el mensaje: ¿Continuamos? (SI: S o s)
LEER Opcion
SI Opcion = S o s ENTONCES IR a 10
EN OTRO CASO Continuar
FIN DEL PROGRAMA

PASOS PARA REALIZARUN PROGRAMA EN FORTRAN
1. EDITAR el programa
Crear un fichero o ficheros FORTRAN. La extensi´n es .F, .FOR, .F77,
o
.F90
2. COMPILAR
Crear un fichero en lenguaje m´guina. La extensi´n es .OBJ
a
o3. LINKAR o UNIR nuestro programa con otras herramientas
necesarias
Edificar o Construir el programa ejecutable con nuestro programa y
todas las dem´s herramientas necesarias. La extensi´n es .EXEa
o
4. EJECUTAR el programa
TODO LO HACEMOS CON EL COMPAQ VISUAL FORTRAN

FacMat - Curso 2007/08 - M´todos Num´ricos I - Pr´cticas de FORTRAN - Sesi´n 1
e
e
a
o

3

ESTRUCTURA DELPROGRAMA
PROGRAM Nombre

(opcional)

´
DECLARACION DE VARIABLES y SENTENCIAS NO EJECUTABLES
↑
CONJUNTO DE SENTENCIAS FORTRAN
↓
END

Sentencias de entrada y salida: READ y PRINT
Ejemplo:...