Actividad:
Ejercicio 1:
Realizar un algoritmo que permita calcular el área de un triangulo, dados la base y la altura. Luego imprimir el resultado.
Solución:
Análisis:
El análisis consiste en determinar las entradas, las salidas y el proceso a realizar para conseguir la solución al problema. Las palabras resaltadas en el enunciado son claves para un buen análisis, ya que permiten identificar los elementos a determinar.
Entrada: Son los datos de los cuales disponemos. En este caso, la base y la altura. Los resumimos en la siguiente tabla:
Descripción | Nombre del Identificador | Tipo de dato |
Base del triángulo | Base | Numérico Real |
Altura del triángulo | Altura | Numérico Real |
Proceso: Según el enunciado, el objetivo de la solución debe ser calcular el área de un triángulo, para lo cual debemos encontrar una fórmula que nos permita hacerlo. Por las matemáticas conocemos que la fórmula para calcular el área de un triángulo es:
|
En caso de que el enunciado no proporcione datos de entrada, estos pueden ser deducidos de la fórmula, ya que el resultado depende de los mismos. Aquí tenemos los detalles del dato:
Descripción | Nombre del Identificador | Tipo de dato |
Área del triángulo | Area | Numérico Real |
Salida: Es el resultado del proceso. En este caso la salida es el resultado del cálculo del Área.
Una vez hecho el análisis, se deben utilizar estos datos junto con las estructuras del Algoritmo y del Programa en Pascal para crear las respectivas soluciones. Observe y analice el resultado final:
ALGORITMO EN PSEUDOLENGUAJE | PROGRAMA EN PASCAL |
INICIO DEL ALGORITMO CalcularArea DEFINIR CONSTANTES D = 2 DEFINIR VARIABLES Base, Altura: Numérico Real Area: Numérico Real PROCESO: ESCRIBIR ( “Tipee la base:” ) LEER (Base) ESCRIBIR ( “Tipee la altura:” ) LEER (Altura) Area = (Base X Altura) / 2 ESCRIBIR ( “ El area es: “ , Area ) FIN DEL ALGORITMO | PROGRAM CalcularArea ; CONST D = 2 ; VAR Base, Altura: REAL ; Area: REAL ; BEGIN WRITE(‘Tipee la base: ‘) ; READLN(Base) ; WRITE(‘Tipee la altura: ‘) ; READLN (Altura) ; Area := (Base * Altura) / 2 ; WRITELN (‘ El area es: ‘ , Area:5:2); READLN; END . |
Prueba de Escritorio (Corrida en Frio):
Una ejecución en el computador podría ser la siguiente, suponiendo que:
Base = 35 y Altura = 15
Tipee la base: 35ï Tipee la altura: 15 ï El area es: 262.5 |
Ejercicios 2: Realizar un algoritmo que permita leer el peso en libras de un objeto, calcule su equivalente en kilogramos y luego lo imprima. Nota: Una libra equivale a 0.4536 kilogramos.
Solución:
Entrada:
Descripción | Nombre del Identificador | Tipo de dato |
Peso en libras de un objeto | Libras | Numérico Entero |
Proceso: Según el enunciado, el objetivo debe ser calcular el equivalente en kilogramos del valor de entrada. Para determinar la fórmula, recurrimos a una regla de tres. Deducimos: Si una libra equivale a 0.4536 kilogramos ¿A cuantos kilogramos equivale el valor de entrada, es decir, Libras? Planteando la regla de tres, tenemos:
1 libra ------------ 0.4536 kilogramos
Libras ------------ ?
La interrogante es la variable de salida y debemos darle un nombre, digamos Kilos. Así:
Descripción | Nombre del Identificador | Tipo de dato |
Equivalente en Kilogramos | Kilos | Numérico Real |
Despejando la incógnita tenemos que:
Kilos = 0.4536 X Libras
El valor 0.4536, fácilmente puede convertirse en una constante.
Salida: Es el resultado del proceso. En este caso la salida es el resultado obtenido de la fórmula.
El algoritmo y el programa quedarían de la siguiente forma:
ALGORITMO EN PSEUDOLENGUAJE | PROGRAMA EN PASCAL |
INICIO DEL ALGORITMO Transformar DEFINIR CONSTANTES Factor = 0.4536 DEFINIR VARIABLES Libras: Numérico Entero Kilos: Numérico Real PROCESO: ESCRIBIR ( “Escriba Peso en libras” ) LEER (Libras) Kilos = Factor X Libras ESCRIBIR(“El Peso en Kilos es: “ , Kilos) FIN DEL ALGORITMO | PROGRAM Transformar ; CONST Factor = 0.4536 ; VAR Libras: INTEGER ; Kilos: REAL ; BEGIN WRITE ( ‘Escriba Peso en libras: ‘ ) ; READLN (Libras) ; Kilos := Factor * Libras ; WRITELN (‘El Peso en Kilos es: ‘, Kilos:10:5) ; READLN ; END . |
Una ejecución en el computador podría ser la siguiente, suponiendo que:
Libras = 140
Escriba Peso en libras: 140ï El Peso en Kilos es: 63.504 |
Realice en equipos (Máximo 3 integrantes) los siguientes Ejercicios Propuestos: (Valor 20 puntos)
1) Realice un algoritmo y luego el programa en Pascal que permita leer la cantidad de lluvia en pulgadas, luego calcule e imprima su equivalente en milímetros. Nota: una pulgada equivale a 25,4 milímetros.
2) Realice un algoritmo y el programa correspondiente en Pascal, que permita leer la cantidad de días que dura una operación científica en el espacio. Transforme este tiempo en horas, minutos y segundos. Imprima las transformaciones.
3) El corazón es un músculo que funciona las 24 horas del día durante toda nuestra vida. Dadas las pulsaciones medias por minuto de una persona, realice el algoritmo y el programa para determinar y visualizar cuantas veces late el corazón en una hora.
Evaluación: Puntaje por ejercicio: 6 puntos cada ejercicio (Total 18 puntos), Puntualidad en la entrega 1 punto, Originalidad en la creación de datos 1 punto (Total 20 puntos)
1. Análisis: Incluir descripción, nombre y tipo de dato definido, fórmula en el proceso (1 Punto)
2. Diseño del Algoritmo: Incluir instrucciones de Entrada, Asignación, Salida, Definición de Variables, Fórmula en el proceso (2 Puntos)
3. Diseño del Programa en Pascal: Incluir instrucciones de Entrada, Asignación, Salida, Definición de Variables, Fórmula en el proceso (2 puntos)
4. Prueba de Escritorio: Incluir tabla de valores de las variables y salidas por el monitor (1 Punto)
