E J E M P L O

Manejo de Archivos

#include <stdlib.h>
#include <stdio.h>
#include <math.h>
int main( void)
{
   /* Propósito: Archivos */
   /* Autor: Prof. Cabassa */
   double A, Cuenta = 0.0, Suma = 0.0, Promedio;
   FILE *Entrada, *Salida;

   Entrada = fopen( "EJEMPLO.DAT", "r" );
   Salida = fopen( "EJEMPLO.OUT", "w" );
   fscanf( Entrada, "%9lf", &A );
   while( ! feof( Entrada) )
   {
      Cuenta++;
      Suma += A;
      fscanf( Entrada, "%9lf", &A );
   }
   if ( Cuenta > 0.0 )
   {
      Promedio = Suma / Cuenta;
      fprintf(Salida,"Promedio = %20.5lE\n", Promedio);
   }
   else
   {
      fprintf( Salida,"No entró valores\n");
   }
   fclose( Entrada );
   fclose( Salida );
   return 0;
}

Última modificación : jueves 25 de junio de 1998