MODIFICACION DE LOS CAMPOS DE ESCRITURA

La longitud de los campos de escritura de cada tipo de dato pueden ser variados utilizando las sentencias

writeln.

write ('Total=',tot :5);

Suponiendo

tot=-134, obtendríamos:

Total= -134

El espacio en blanco, está comprendido dentro del ancho del campo especificado.

Ejemplo:

write ('Total=',tot :lar+3);

Suponiendo

tot=-134 y lar=3 , obtendríamos:

Total= -134

Nótese que ahora hay dos espacios en blanco y el dato fue desplazado a la derecha. De otra manera, en caso que el ancho de campo no alcance, se agregan los espacios necesarios para que el dato no se corte.

Ejemplo:

write ('Total=',tot :5);

Suponiendo

tot=900134, obtendríamos:

Total= 900134

Ahora, se han añadido 2 espacios al ancho del campo para que el número de 6 dígitos y su signo se escriban correctamente.

Un número de tipo real puede escribirse sin exponente si se incluye un segundo término en el formato. Así, el

formato completo para un número real es (:) dos puntos seguido de un entero que indica el ancho total del campo, seguido por (:) dos puntos y un segundo entero que indica a su vez, la cantidad de lugares a la derecha del punto decimal. La parte decimal, se redondea automáticamente.

Ejemplo:

Suponiendo que

escribirá según la sentencia write usada en cada caso como sigue a continuación:

nodo es una variable real a la que se le ha asignado el número 35200.203, el número se

Sentencia Resultado

writeln ('Nodo=',nodo); Nodo= 3.5200203E+04

writeln ('Nodo=',nodo : 12); Nodo= 3.52002E+04

writeln ('Nodo=',nodo : 18); Nodo= 3.52002030000E+04

writeln ('Nodo=',nodo : 10 : 3); Nodo= 35200.203

writeln ('Nodo=',nodo : 8 : 1); Nodo= 35200.2

write y En general, cada dato puede ir seguido de (:) dos puntos y una cantidad positiva que indique el ancho de campoa usar para ese dato en particular.

Ejemplo: