[Xianto]

var
  f: TextFile;
begin
   AssignFile(f, 'pepe.prn');
		  Rewrite(f);
		  Writeln(f, 'Linea1');
		  Writeln(f, 'Linea2');
		  Writeln(f, 'Linea3');
		  Flush(f);
   CloseFile(f);
end;

Imagino que a archivo plano le llamas a un archivo de texto...