%
% Entrada-salida a y desde archivos
%

f2 = fopen('misdatos4.txt', 'r');

fprintf('\n     DETALLE DE DATOS LEIDOS\n\n');
fprintf('Nro. lectura      Cantidad leida\n');

ntotread = 0;
while(1)
  [v, n] = fscanf(f2, '%g', 1);
%  fprintf('Número de datos leidos: %d\n', n);
  if (n <= 0)
    break;
  end
  ntotread = ntotread + 1;
  fprintf('%8d            |%20.12g|\n', ntotread, v);
end

status = fclose(f2);

fprintf('\nEl número total de datos leidos es %d\n', ntotread);
