2. Generalidades y tipos simples

1.1 Generalidades

Vamos a ver como hacer nuestro primer programa, y quedará algo como:

program helloworld;
begin
 write ('Hola mundo');
 readln;
end.

Como vemos el programa siempre se va a iniciar con program [nombre]; , es algo obligatorio y se toma como si de un axioma se tratara.

A continuación podemos ver un begin , que nos marca el inicio del programa, también indispensable.

Luego, un write (‘Hola mundo’); .write se utiliza para mostrar por pantalla lo que hay entre los paréntesis (). Si queremos mostrar una frase directamente como Hola mundo, tendremos que ponerlo entre comillas (‘). Si utilizamos writeln estamos diciendo que cuando escriba salte de linea. Para mostrar por pantalla una variable se pone write(variable); . Siempre con punto y coma (;) después de cada instrucción.

readln se utiliza para leer de teclado lo que introduzcamos en una linea, pero en este caso no tiene paréntesis (), por lo que solo se usa para que haga una pausa y que nuestro programa no finalice hasta que demos al Enter (quiere decir que lee hasta final de linea). Al igual que con write, aquí se puede utilizar read, para leer una variable se usa read(variable); que guarda en variable lo que lea hasta el primer blanco (espacio) o readln(variable); que hace lo mismo, pero hasta fin de línea. Se puede usar Como ya dijimos antes “;” después de cada instrucción de este tipo.

El end. (siempre con el .) indica el fin del programa, es tan necesario como el program [nombre]; o el begin.

Un aspecto importante (a tener en cuenta), es que pascal no diferencia entre mayúsculas y minúsculas (en las instrucciones).Es igual poner BEGIN, begin o BeGiN.

Llegado este punto os propongo un ejercicio:

Haz un programa que diga Este es mi primer programa.

1.2 Estructura básica

Los programas tienen una estructura muy básica que nos ayudará a su implementación.

program [nombre];
const
 const1= 5;
 const2= 'c';
var
 var1: integer;
 var2: char;
begin
 ...
end.

Const

Lugar donde se pueden declarar constantes. Solo se pueden igualar a valores de tipos simples de datos. ¿Esto qué quiere decir? Que solo se pueden igualar a un valor real (número real), un valor entero (número entero), un caracter o verdadero o falso (booleano).

Las constantes se declararían nombre= valor:

program [nombre];
const
 valor_real= 5.25;
 valor_entero= 6;
 valor_caracter= 'c';
 valor_bool= true;
begin
 ...
end.

Var

Sirve para declarar todas las variables que queramos. ¿Qué es una variable? Por así decirlo, una variable es una reserva de memoria para un tipo de dato concreto. Se declara de la forma nombre_variable: tipo. Los tipos que estamos viendo en este apartado son los simples, integer (entero), char (caracter), boolean (booleano), real (reales).

program [nombre];
const

var

num_real1, num_real2 : real;

num_entero: integer;

caract: char;

booleano: boolean;

begin
 ...
end.

¿Qué operaciones podemos realizar?

Para que una variable adquiera el valor de otra, o de alguna operación entre varias:

Siendo variable2 donde queremos guardar el resultado:

  1. variable2:= 1+5;
  2. variable2:= 3.45;
  3. variable2:= ‘c’;
  4. variable2:= variable1;
  5. variable2:= true;

Con los enteros podemos:

Sumar y restar: suma:= variable_ent1+variable_ent2; , resta:= variable_ent1-varibale_ent2; .

Multiplicar y dividir: producto:= variable_ent1*variable_ent2; , cociente:= variable_ent1 div varible_ent2; .

Resto (de la división): resto:= variable_ent1 mod variable_ent2; .

Predecesor y sucesor: variable_int: pred(variable_int); , variable_int:= int(variable_int);

Comparaciones binarias: <, >, =, <=, >=, ><.

Con el tipo caracter:

Predecesor y sucesor: variable_car: pred(variable_car); , variable_car:= succ(variable_car);.

Comparaciones binarias: <, >, =, <=, >=, ><.

Con el tipo real:

Sumar y restar: suma:= variable_ent1+variable_ent2; , resta:= variable_ent1-varibale_ent2; .

Multiplicar y dividir: producto:= variable_ent1*variable_ent2; , cociente:= variable_ent1 / varible_ent2; .

Valor absoluto: abs(var).

Seno y coseno: sin(var) , cos(var).

Logaritmo neperiano: ln(var);

Cuadrado (var^2) y raíz cuadrada: sqr(var) , sqrt(var).

Sabiendo esto podemos hacer ya un programa que sume números y los multiplique por 2:

program suma;
const

mult= 2;

var

num1, num2 : integer;

begin
 writeln ('Introduzca dos números enteros separados por espacios');
 read(num1,num2);
 writeln;
 writeln ('La suma de los numeros es: ',num1+num2);
 readln;
 writeln ('El doble de su suma es: ', (num1+num2)*mult);
 readln;
end.

Con esto ya tendremos el programa. Probad a compilarlo y modificarlo.

Ejercicio:

Haz un programa que reste números enteros.

Cualquier duda pon un comentario ;) .

siguiente sección >>
<< Volver

Deja un comentario

Puedes utilizar código html como <b>Texto</b> para negrita, <i>Texto</i> para la cursiva o <u>Texto</u> para subrayar.