Pascal: Instrucciones y tipos de datos simples (página 3)

Partes: 1, 2, 3

Ejemplo
var
x: integer;
begin
…
x:= 1;
x:= x + 3;
…
end.
Explicación de lo que ocurre en memoria…

Ejemplos de asignaciones

Ejemplos de asignaciones
Si x=5, y=10, z=20 ¿Cuál es valor de x después de recibir las siguientes asignaciones?

x := y;

x := 5*y;

x := 5;

x := x*x;

x := x div x;

x := succ(y) + succ(z) – z;

Dadas las siguientes declaraciones
const blanco = ‘ ’;
var p, q: integer; x, y: real; a, b: boolean; c1: char;
indica si las siguientes sentencias son válidas
p:= trunc (y) + x;
a:= p + q;
a:= b and (ord (c1) <> ‘A’);
x:= x – trunc (x);
x:= y div p;
a:= odd (p-1);
p:= round (q / (10 div p));
p:= 100 div (4 div 5);
z:= succ (c1);

Ejemplos de asignaciones

La sentencia write de Pascal
Visualización/Impresión de información en la pantalla de la consola/ventana del usuario, durante la ejecución del programa
write (lista-de-salidas)

Elementos a visualizar separados por comas
(Se visualizan todos en la misma línea en pantalla)

Ejemplo:
var
cent: real;
begin
…
write(‘En cms:’, cent)
end.
Salida por consola

La sentencia writeln de Pascal
Visualización/Impresión de información en la pantalla de la consola/ventana del usuario, durante la ejecución del programa
writeln (lista-de-salidas) ó writeln

Elementos a visualizar separados por comas
(Se visualizan todos en la misma línea en pantalla y luego se salta de línea; o sólo se salta de línea, con writeln a secas)

Ejemplo:
var
cent: real;
begin
writeln(‘¿Longitud?’);
…
writeln(‘En cms:’, cent)
end.

Salida por consola

Salida por consola
Enteros y caracteres
Por defecto, se usan tantas posiciones como dígitos tenga el número o una sóla posición si es un carácter

Elemento : numeroPosiciones (Significa que se usan tantas posiciones como indica numeroPosiciones)

Ejemplo:

var x, y: integer;
writeln (‘Resultado:’ , x * y: 5);

Salida por consola
Reales

Elemento : longitudTotal : numeroDecimales
(Significa que se usa la notación habitual con longitudTotal indicando las posiciones que se usan -incluyendo punto decimal y signo si lo hay- de las cuales numeroDecimales se reservan para los decimales -redondeando si es necesario-)

Elemento : longitudTotal
(Significa que se usa la notación científica con longitudTotal indicando las posiciones totales que se usan)

Notación científica por defecto: e.ddddddddddE?xx ó -e.ddddddddddE?xx

La entrada por consola funciona de una manera peculiar:

Hay un almacén de caracteres para ir guardando todos los caracteres (visibles o invisibles) que escriba el usuario
Ej. Al pulsar la tecla F introducimos el carácter ‘F’ pero si luego pulsamos la tecla Enter introducimos además dos caracteres invisibles: un salto de línea y un fin de línea

A continuación veremos sentencias que “leen” caracteres de ese almacén y, generalmente, borran todos los que han leído
Ej: read, readln y eoln

Si una de estas instrucciones se encuentra el almacén vacío, la ejecución del programa se detendrá y aparecerá un cursor en la ventana/consola del usuario que permite escribir más

Entrada por consola

La sentencia read de Pascal
Lectura de información desde el almacén de caracteres
read (lista-de-variables)

variables destino separadas por comas
Lee los caracteres necesarios para formar cada dato(un sólo carácter si debe leer un dato de tipo char, varios si debe leer un dato de tipo integer formado con varios dígitos…)y borra sólo esos caracteres leídos

Ejemplo:
var letra: char;
begin
writeln(‘¿Letra favorita?’);
read(letra);
…
end.
Entrada por consola

La sentencia readln de Pascal
Lectura de información desde el almacén de caracteres
readln (lista-de-variables) o readln
variables destino separadas por comas
Lee los caracteres necesarios para formar cada dato(un sólo carácter si debe leer un dato de tipo char, varios si debe leer un dato de tipo integer formado con varios dígitos…)y borra todos los del almacén (fin de línea incluido)

Ejemplo:
var pulgadas: real;
begin
writeln(‘¿Longitud?’);
readln(pulgadas);
…
end.
Entrada por consola

La sentencia eoln de Pascal
Comprobación de fin de línea inminente en el almacén de caracteres
eoln

Si el primer carácter del almacén (el siguiente a leer) es un fin de línea devuelve cierto, devolviendo falso en caso contrario; pero ¡no borra ningún carácter del almacén!

Ejemplo:
var final: boolean;
begin
final:= eoln;
writeln(final);
…
end.

Entrada por consola