EXPLICACION DE EJERCICIOS DE PROGRAMACIÓN

PROGRAMACIÓN

EJERCICIO 1.

PROGRAM EJER01;

var a,b,c:INTEGER;

BEGIN

{Empezamos con lo básico, un programa que escribe la suma de 2 numeros en pantalla}

a:=4;

b:=3;

{Se asigna un valor cualquiera a las variables "a" y "b"}

c:=a+b;

WRITE (c); {Muestra en pantalla el valor de la suma}

END.

Explicación:

• En PROGRAM se indica el número de ejercicio que en el que estamos trabajando. En este caso es el ejercicio 1.
• Var indica el número de variables a las que luego se le asigna un valor.Por otro lado, Integer indica que trabajamos con números enteros.
• BEGIN indica cuando empezar a ejecutar el proceso.
• A la variable “a” le asignamos el valor 4 y a la “b”, el valor 3. El punto y coma sirve para indicar cuando termina el renglón, es decir, el salto de línea.
• La variable “c” se define como la suma de “a” y “b”, es decir, 4+3.
• WRITE (c) permite que se lleve a cabo la operación y que se muestre el resultado en la pantalla, en este caso el resultado es 7.
• END incica cuando terminar.

EJERCICIO 2.

PROGRAM EJER03;

USES CRT;

VAR lado1,lado2:INTEGER;

VAR area:INTEGER;

BEGIN

{Este programa nos va a servir para calcular el area de un rectángulo}

{Damos valores para las variables}

lado1:=3;

lado2:=4;

area:=lado1*lado2; {Calculamos el area}

ClrScr;

WRITE ('AREA DEL RECTANGULO: '); WRITE (area); {Lo mostramos en pantalla}

END.

Explicación.

• En PROGRAM se indica el número de ejercicio que en el que estamos trabajando. En este caso es el ejercicio 3.
• Las variables (var) que indica se refieren a los lados de un rectángulo y el área.
• Integer indica que los números son enteros.
• Begin indica cuándo comienza a ejecutarse el programa
• Se lleva acabo definiendo ambos lados del triángulo y la multiplicación que requiere para halla el área del triángulo
• para que el resultado se vea, utiliza write
• Por último, end indica cuando termine de ejecutarse el programa.

EJERCICIO 3

PROGRAM EJER04;

USES CRT;

VAR base,altura:REAL;

VAR area:REAL;

BEGIN

base:=7;

altura:=4;

area:=(base * altura) / 2;

ClrScr;

WRITE ('AREA DEL TRIANGULO: '); WRITE (area:5:2);

{:5:2 sirve para dar el formato de salida al numero, 5 posiciones y 2 decimales}

END.

EXPLICACIÓN:

• En PROGRAM se indica el número de ejercicio que en el que estamos trabajando. En este caso es el ejercicio 4.
• Las variables que introducen son la base y la altura de un triángulo
• REAL in dica que son números reales los de las variables
• begin indica el comienzo del programa
• El ejercicio lo lleva a cabo definindo la base con 7 y la altura con 4.También indica que el área es el resultadp de multiplicar la base por la altura con este signo * y posteriormente dividir la multiplicación entre 2 cn este signo /.
• A continuación, cn write indica que muestra en la pantalla “ára del triángulo”
• :5:2 sirve para dar el formato de salida al numero, 5 posiciones y 2 decimales.
• End indica cuando termina la ejecución del programa.