SEMANA # 20

REVISIÓN DE EXÁMENES DE ALGORITMOS

/* Calcular el numero de pulsaciones que una persona debe tener por cada 10 segundos de ejercicios, si la formula es numero pulsaciones=(220-edad)/10
NP <- NUMERO DE PULSACIONES
E <- EDAD
*/
 ENTERO NP
 ENTERO E

 INICIO

 ESCRIBA "INGRESE EDAD"
 LEA E
 LLAMAR NUEVA_LINEA

 /*operacion*/
 NP <- (220-E)/10

 ESCRIBA " NUMERO DE PULSACIONES ES:",NP
 FIN


/* leer las coordenadas cartesianas de dos puntos en el plano y hallar la distancia entre estod dos puntos D=((X1*X1-X2*X2)+(Y1*Y1-Y2*Y2))*(1/2)
D <- DISTANCIA
X1 <- PUNTO X UNO
X2 <- PUNTO X DOS
Y1 <- PUNTO Y UNO
Y2 <- PUNTO Y DOS
*/

REAL D
REAL X1
REAL X2
REAL Y1 
REAL Y2

INICIO

ESCRIBA " El valor de X1"
LEA X1
LLAMAR NUEVA_LINEA

ESCRIBA " El valor de X2"
LEA X2
LLAMAR NUEVA_LINEA

ESCRIBA " El valor de Y1"
LEA Y1
LLAMAR NUEVA_LINEA

ESCRIBA " El valor de Y2"
LEA Y2
LLAMAR NUEVA_LINEA

/*OPERACION*/
D<-((X1*X1-X2*X2)+(Y1*Y1-Y2*Y2))*(1/2)
ESCRIBA " EL VALOR DE LA DISTANCIA ENTRE LOS PUNTOS ES:", D
FIN 

/* Una tienda ofrece un descuento del 15% sobre el total de la compra y un cliente desea saber debería pagar finalmente por su compra 
D <- DESCUENTO
TC <- TOTAL DE LA COMPRA 
PT <- PAGO TOTAL
*/

REAL D
REAL TC 
REAL PT

INICIO

ESCRIBA " El total de la compra"
LEA TC
LLAMAR NUEVA_LINEA

/*OPERACION*/
D <- 0.15*TC
PT <- TC-D

ESCRIBA "El total a pagar es:", PT

FIN