ficheros texto
Publicado por PAULA (7 intervenciones) el 28/05/2019 16:42:11
hola necesito de vuestra ayuda, tengo que hacer este ejercicio..pero los apuntes son malos no lo siguiente y no te explican como hacerlo, yo he creado un archivo en el bloc de notas en c para abrirlo.. no se si esta bien.. el ejercicio me pide esto:
Realizar un programa que abra un fichero de texto para lectura, y lo vaya leyendo línea a línea. Deberá presentar como resultado final el nombre del fichero, el número de líneas y el número de caracteres.
NOTA: Recuerde que en la posición cero de una cadena de caracteres se almacena la longitud, pero debe usar la orden ord para tratar esta longitud como un entero.
yo he realizado por ahora esto....(que no hay por donde cojerlo) hay que crear una array para leer las lineas?
Alguien que me oriente de como se puede realizar...
mi archivo de texto es este: se llama lista.txt.
listado nombres
Realizar un programa que abra un fichero de texto para lectura, y lo vaya leyendo línea a línea. Deberá presentar como resultado final el nombre del fichero, el número de líneas y el número de caracteres.
NOTA: Recuerde que en la posición cero de una cadena de caracteres se almacena la longitud, pero debe usar la orden ord para tratar esta longitud como un entero.
yo he realizado por ahora esto....(que no hay por donde cojerlo) hay que crear una array para leer las lineas?
Alguien que me oriente de como se puede realizar...
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
procedure texto;
type
tfichero= text;
var
fichero:tfichero;
ficherot:text;
linea:integer;
procedure abrir_leer(ficherot:text);
var
ficherot:='C:\Lista.txt';
linea=:=8;
begin
assing(fichero,ficherot);
reset(fichero);
end;
mi archivo de texto es este: se llama lista.txt.
listado nombres
1
2
3
4
5
6
LUCIA
AITOR
GRACIANO
SARA
ALBERTO
PILAR
Valora esta pregunta


0