Pascal/Turbo Pascal - pregunta.txt

mi problema es el siguiente:
quiero mostrar en un archivo de texto los nombres de las personas X linea en un archivo de texto.
q sentencias debo usar para poder hacer esto???

var
txt:text;
nombre:string;

begin

assign(txt,'dato.txt')
rewrite(txt);
reset(txt);
readln(nombre);

while nombre<>'pepe' do begin

???? q sentencias van aca ???

readln(nombre);
end;

close(txt);

graicas...

hola, primero y principal, estas creando y luego abriendo un fichero, estas violando muchas reglas, tampoco utilizas algun verificador de errores, eso para empezar.... lo que vos podes hacer se puede hacer con un FOR desde 1 hasta la posicion que queres ir.

var
archivo:text;
ok:boolean;
begin
apertura y manejo de errores en apertura
for desde uno hasta la posicion que quieres utilizar
end
saludos

No puedes insertar una línea al medio de un archivo de texto (tipo text), solo puedes agregar líneas nuevas al final del archivo.

Si es eso lo que quieres hacer entonces, si el archivo no existe lo abres con rewrite y escribes la línea con WriteLn, si el archivo ya existe lo abres con Append y procedes de igual manera. Append lleva el puntero del archivo al final de un archivo de texto.

var
txt:text;
nombre:string;

begin

assign(txt,'dato.txt')
rewrite(txt);

readln(nombre);

while nombre<>'pepe' do begin

writeln(txt,nombre);

readln(nombre);
end;

close(txt);

asi esta bien ???

Yo creo que sí.