Un_básico_al_detalle[entra ya!!]

A continuación les dare paso a paso como podemos adaptar un script en fortran 90 para poder obtener o mostrar data en teclado o en un archivo según nos convenga o soliciten de manera básica con el fin de despejar dudas y perder el miedo a programar. El compilador que usare sera FORCE cual lo tenia a la mano . Y el proceso de expliacion sera primero mostrando un script muy sencillo con su funcionamiento detallado y a partir de ahi ire modificando pequeñas partes para lograr incluir el uso de archivos .Comenzemos : NUMEROS.F TENDRAN QUE LEER LOS COMENTARIOS A DETALLE Y TENER CIERTOS CONOCIMIENTOS PARA ENTENDER LO ANTERIOR, PERO ACA LES HECHO UNA MANO : LINEA 1 : Damos inicio por formalidad y con el "end" de la linea 35 lo cerramos. LINEA 2 : El IMPLICIT NONE nos ordena declarar cada variable q usaremos. LINEA 4 : Esta es la forma de declarar variables reales en fortran LINEA 6 : Pedimos por teclado el ingreso de un dato LINEA 7 : Y lo que digitado en el teclado lo leemos y guardamos en una variable OJO TENER EN CUENTA COMO SE USA EL (*,*) LINEA 16 : Simplemente sumamos todo y lo guardamos en una varibale ya declarada LINEA 17 : Como Ya tenemos la suma guardada, llamamos esa variable para hallar el promedio LINEA 20 : la sintaxis general es : "if( )then" y para cerrar "end if" OJO EL ".eq." tan solo reemplaza un "==" PARA COMPARAR IGUALDADES LINEA 22 : EL " write(*,*)' ' " SOLO NOS SIRVE COMO SALTO DE LINEA LINEA 23 : EL "goto" indica q retornaremos a la linea 11 donde esta nuestra seña LINEA 26 : Tan solo calculamos el cociente deseado , el cual tan solo sera calculado si los 2 ultimos numeros no suman cero, ya que si no entrará al IF y el GOTO lo retrocederá. LINEA 28 : Esta es la sintaxis para mostrar en pantalla una variable. LINEA 34 : El STOP nos sirve para que al compilar el el executable no se cierre y nos espere. AHORA SI HAREMOS UNA PEQUEÑA MODIFICACION PARA GUADAR EL RESULTADO EN UN TEXTO : GO!!! NUMEROS2.f LINEA 1 : Quitamos la formalidad de iniciarla pero OJO siempre finalizamos con END. LINEA 21 : Es como crear un puntero a mi archivo y decir cual es, y bajo esta forma de sintaxis se abre automaticamente con permisos de lectura y escritura y si no existe lo crea. LINEA 22 : Aaprtir de aca veremos la sintaxis con la cual le decimos a WRITE que esta vez escriba en el texto que llamamos. LINEA 30 : Una vez al terminar de usar mi archivo lo cierro. OJO EN LA MISMA UBICACION DONDE ESTA NUESTRO SCRIPT .F ENCONTRAREMOS Y PARA FINALIZAR PARA MOSTRAR COMO SACAR DATA DE UN ARCHIVO Y GUARDARLA EN OTRO USARE OTRO SCRIPT MAS ADECUADO, Y COMO YA ME DIO FLOJERITA EXPLICARLO EN ESTE POST LOS DETALLES ESTARAN COMO COMENTARIOS EN MI SCRIPT Y CUALQUIER DUDA COMENTAN EL POST =p, GO!!! RECTANG.TXT RECTPOL2.F Las tres imagenes muestran el proceso de como mi script lee los datos de un archivo llamado rectang.txt y apartir de él realiza un proceso y lo guarda en un archivo llamado polar.txt, por eso si revisan la ubiacion donde coloquen el .txt y en .f que les dje para descargar veran el archivo llamado polar.txt tal cual lo muestra la imagen. OJO: En modo practica pueden cambiar el contenido del archivo rectang.txt y veran que las soluciones en el otro archivo tambien cambiaran ESPERO LES SEA DE UTILIDAD