write
(procedimiento)
Lenguaje: Pascal
Escribe una o varias variables
Declaración: procedure Write( [ var F: Text; ] P1 [,P2,...,Pn ] );
procedure Write(F, V1 [, V2,...,Vn ] );
Detalles:
En archivos de texto, "write" escribe uno o más valores (expresiones de cualquier tipo) en el archivo.
En archivos con tipo , "write" escribe una variable o varias variables, que debes ser del tipo base del archivo.
En caso de escribir en pantalla, se comporta como en un fichero de texto.
En caso de escribir a archivo, éste debe estar abierto para escritura.
En los ficheros de texto, cada parámetro puede contener especificaciones de ancho de campo y de cantidad de cifras decimales.
Cada expresión de salida debe ser de tipo Char, Integer, Real, String o Boolean.
En los ficheros con tipo, para cada variable que se escriba, la posición del archivo actual avanzará a la siguiente componente.
En cualquier caso, si la posición del archivo actual se encuentra al final del archivo, éste se expande.
Para comprobar errores, en modo {$I-} IOResult devuelve 0 si la operación ha tenido éxito; de lo contrario, devuelve un código de error distinto de cero.
Ejemplo:
var
F: Text;
C: Char;
begin
{ Nombre del fichero desde línea de comandos }
Assign(F, ParamStr(1));
Reset(F);
while not Eof(F) do
begin
Read(F, C);
Write(C); { Volcar fichero, letra a letra }
end;
end.
Órdenes relacionadas:
read readln writeln
Volver al índice de la referencia o al
apartado de Pascal