TALLER ALGORITMOS
-26/*El gobierno del estado de México desea reforestar un bosque que mide determinado numero de hectáreas Si la superficie del terreno excede 1 millón de metros
cuadrados entonces se decidirá sembrar de la siguiente manera:
porcentaje de la superficie del bosque tipo de árbol 70% PINO, 20% OYAMEL Y 10% CEDRO
si la superficies del terreno es menor o igual a 1 millón de metros cuadrados entonces se decidira sembrar de la siguiente manera:
porcentaje de la superficie del bosque tipo de arbol: 50% PINO, 30% OYAMEL Y 20% CEDRO
El gobierno desea saber el numero de pinos, oyamel, y cedros que tendra que sembrar en el bosque si se sabe que en 10 metros cuadrados caben 8 pinos, en 15 metros
cuadrados caben 10 cedros. Tambien se sabe que una hectarea equivale 10 mil metros cuadrados
TMC <- TOTAL METROS CUADRADOS
NH <- NUMERO DE HECTAREAS
TPH <- TOTAL PINOS HECTAREA
TOH <- TOTAL OYAMEL HECTAREA
TCH <- TOTAL CEDROS HECTAREA
CP <- CANTIDAD PINOS
CO <- CANTIDAD OYAMEL
CC <- CANTIDAD CEDROS
CPP# <- CANTIDAD PINOS PORCENTAJE
COP# <- CANTIDAD OYAMEL PORCENTAJE
CCP# <- CANTIDAD CEDROS PORCENTAJE
TOC# <- TOTAL OYAMEL SEMBRADOS
TPC# <- TOTAL PINOS SEMBRADOS
TCC# <- TOTAL CEDROS SEMBRADOS
*/
ENTERO TMC, NH, TPH, TOH, TCH, CP, CO, CC
ENTERO CPP,COP, CCP, TPC, TOC, TCC
ENTERO COP2, CPP2, TPC2, TOC2, TCC2, CCP2
INICIO
ESCRIBA " DIGA EL NUMERO DE HECTAREAS "
LEA NH
LLAMAR NUEVA_LINEA
TMC <- NH*10000
TPH <- 8*10000
TOH <- 15*666
TCH <- 10*555
ESCRIBA " LAS HECTAREAS EQUIVALEN A:", TMC
LLAMAR NUEVA_LINEA
SI (TMC > 100000) ENTONCES
CP <- TPH * NH
CPP <- CP * 0.7
TPC <- CP-CPP
CO <- TOH * NH
COP <- CO * 0.2
TOC <- CO-COP
CC <- TCH * NH
CCP <- CO *0.1
TCC <- CC-CCP
ESCRIBA "LA CANTIDAD DE PIMOS A SEMBRAR ES: ", TPC
LLAMAR NUEVA_LINEA
ESCRIBA "LA CANTIDAD DE OYAMEL A SEMBRAR ES: ", TOC
LLAMAR NUEVA_LINEA
ESCRIBA "LA CANTIDAD DE CEDROS A SEMBRAR ES: ", TCC
SINO
SI (TMC <= 100000) ENTONCES
CP <- TPH * NH
CPP2 <- CP * 0.5
TPC2 <- CP-CPP
CO <- TOH * NH
COP2 <- CO * 0.3
TOC2 <- CO-COP
CC <- TCH * NH
CCP2 <- CO *0.2
TCC2 <- CC-CCP
ESCRIBA "LA CANTIDAD DE PIMOS A SEMBRAR ES: ", TPC2
LLAMAR NUEVA_LINEA
ESCRIBA "LA CANTIDAD DE PIMOS A SEMBRAR ES: ", TOC2
LLAMAR NUEVA_LINEA
ESCRIBA "LA CANTIDAD DE PIMOS A SEMBRAR ES: ", TCC2
FIN SI
FIN SI
FIN
6/* Un taxista trabaja en la empresa " penguiTAXI" en el cual le asigna tres rutas: Ruta A con un valor de 3000, Ruta B con un valor de 5000 y Ruta C con un valor
de 7000. ademas, debe combrar un recago de 500 si esta trabajando entre las 20:00 y las 5:00. si es festivo hay un recago de 100. cuanto debe pagar unn usuario
que tome el servicio
R <- RUTA
H <- HORA
D <- DIA
*/
ENTERO R, H, D, TS
ENTERO TS1, TS2, TS3, TS4, TS5, TS6, TS7, TS8, TS9, TS10, TS11
INICIO
ESCRIBA "Tenga en cuenta la siguiente informacion RUTA A=1, RUTA B=2, RUTA C=3"
LLAMAR NUEVA_LINEA
ESCRIBA " Diga la ruta del servicio: "
LEA R
LLAMAR NUEVA_LINEA
LLAMAR NUEVA_LINEA
ESCRIBA "Tenga encuenta la siguiente iformacion HORA DE RECARGO(20:00 Y 5:00)=1 HORA NORMAL=2"
LLAMAR NUEVA_LINEA
ESCRIBA " La hora del servicio: "
LEA H
LLAMAR NUEVA_LINEA
LLAMAR NUEVA_LINEA
ESCRIBA " Tenga encuenta la siguiente informacion DIA FESTIVO=1 DIA NORMAL=2"
LLAMAR NUEVA_LINEA
ESCRIBA "Diga el dia del servicio: "
LEA D
LLAMAR NUEVA_LINEA
LLAMAR NUEVA_LINEA
SI ( R = 1 ) Y ( H = 1) Y ( D = 1) ENTONCES
TS <- 3000+500+100
ESCRIBA " El total del servicio es:", TS
SINO
SI ( R = 1 ) Y ( H = 1) Y ( D = 2) ENTONCES
TS1 <- 3000+500
ESCRIBA " El total del servicio es:", TS1
SINO
SI ( R = 1 ) Y ( H = 2) Y ( D = 1) ENTONCES
TS2 <- 3000+100
ESCRIBA " El total del servicio es:", TS2
SINO
SI ( R = 1 ) Y ( H = 2) Y ( D = 2) ENTONCES
TS3 <- 3000
ESCRIBA " El total del servicio es:", TS3
SINO
SI ( R = 2 ) Y ( H = 1) Y ( D = 1) ENTONCES
TS4 <- 5000+500+100
ESCRIBA " El total del servicio es:", TS4
SINO
SI ( R = 2 ) Y ( H = 1) Y ( D = 2) ENTONCES
TS5 <- 5000+500
ESCRIBA " El total del servicio es:", TS5
SINO
SI ( R = 2 ) Y ( H = 2) Y ( D = 1) ENTONCES
TS6 <- 5000+100
ESCRIBA " El total del servicio es:", TS6
SINO
SI ( R = 2 ) Y ( H = 2) Y ( D = 2) ENTONCES
TS7 <- 5000
ESCRIBA " El total del servicio es:", TS7
SINO
SI ( R = 3 ) Y ( H = 1) Y ( D = 1) ENTONCES
TS8 <- 7000+500+100
ESCRIBA " El total del servicio es:", TS8
SINO
SI ( R = 3 ) Y ( H = 1) Y ( D = 2) ENTONCES
TS9 <- 7000+500
ESCRIBA " El total del servicio es:", TS9
SINO
SI ( R = 3 ) Y ( H = 2) Y ( D = 1) ENTONCES
TS10 <- 7000+100
ESCRIBA " El total del servicio es:", TS10
SINO
SI ( R = 3 ) Y ( H = 2) Y ( D = 2) ENTONCES
TS11 <- 7000
ESCRIBA " El total del servicio es:", TS11
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN
4/* en una universidad de ibague, los estudiantes de programcion tiene que presentar 6 pruebas de conocimiento para evaluar la asignatura: una pruba se gana
con una nota minima de 3.0. Dterminar si el estudiante aprobo o no la signatura. El alimno aprueva la asiganatura si cumple con caualquiera de las siguientes
condiciones: a)si tiene minimo 3 pruvas con nota superiores a 3.5 b)si el promedio de las seis notas es minimo de 3.0 c) si el promedio de las notas
de las pruebas es superior a 2.5
DAN <- NP1, NP2, NP3, NP4, NP5, NP6
PIDEN <- DETERMINAR SI EL ESTUDIANTE APRUEBA LA ASIGNATURA
NP1 <- NOTA PRUEVA UNO
NP2 <- NOTA PRUEVA DOS
NP3 <- NOTA PRUEVA TRES
NP4 <- NOTA PRUEVA CUATRO
NP5 <- NOTA PRUEVA CINCO
NP6 <- NOTA PRUEVA SEIS
PM <- PROMEDIO
*/
REAL NP1, NP2, NP3, NP4, NP5, NP6, PM
INICIO
ESCRIBA "diaga la nota de la prueba uno "
LEA NP1
LLAMAR NUEVA_LINEA
ESCRIBA "diaga la nota de la prueba dos "
LEA NP2
LLAMAR NUEVA_LINEA
ESCRIBA "diaga la nota de la prueba tres "
LEA NP3
LLAMAR NUEVA_LINEA
ESCRIBA "diaga la nota de la prueba cuatro "
LEA NP4
LLAMAR NUEVA_LINEA
ESCRIBA "diaga la nota de la prueba cinco "
LEA NP5
LLAMAR NUEVA_LINEA
ESCRIBA "diaga la nota de la prueba seis "
LEA NP6
LLAMAR NUEVA_LINEA
SI (NP1>=3.5) Y (NP2 >=3.5)Y (NP3>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1=3.5) Y (NP5 >=3.5)Y (NP6>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=3.5) Y (NP3 >=3.5)Y (NP5>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP2>=3.5) Y (NP4 >=3.5)Y (NP6>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=3.5) Y (NP2 >=3.5)Y (NP4>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=3.5) Y (NP2 >=3.5)Y (NP5>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=3.5) Y (NP2 >=3.5)Y (NP6>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=3.5) Y (NP3 >=3.5)Y (NP4>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=3.5) Y (NP3 >=3.5)Y (NP6>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=3.5) Y (NP4 >=3.5)Y (NP5>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=3.5) Y (NP4 >=3.5)Y (NP6>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP2>=3.5) Y (NP3 >=3.5)Y (NP4>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP2>=3.5) Y (NP3 >=3.5)Y (NP5>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP2>=3.5) Y (NP3 >=3.5)Y (NP6>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP2>=3.5) Y (NP4 >=3.5)Y (NP5>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP2>=3.5) Y (NP5 >=3.5)Y (NP6>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP3>=3.5) Y (NP4 >=3.5)Y (NP5>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=3.5) Y (NP2 >=3.5)Y (NP3>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP3>=3.5) Y (NP4 >=3.5)Y (NP6>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP3>=3.5) Y (NP5 >=3.5)Y (NP6>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP4>=3.5) Y (NP5 >=3.5)Y (NP6>=3.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=3.0) Y (NP2 >=3.0)Y (NP3>=3.0) Y(NP4>=3.0) Y (NP5>=3.0) Y(NP6>=3.0) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP4>=2.5) Y (NP5 >=2.5)Y (NP6>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP3>=2.5) Y (NP5 >=2.5)Y (NP6>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP3>=2.5) Y (NP4 >=2.5)Y (NP6>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP3>=2.5) Y (NP4 >=2.5)Y (NP5>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP2>=2.5) Y (NP5 >=2.5)Y (NP6>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP2>=2.5) Y (NP4 >=2.5)Y (NP5>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP2>=2.5) Y (NP3 >=2.5)Y (NP6>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP2>=2.5) Y (NP3 >=2.5)Y (NP5>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP2>=2.5) Y (NP3 >=2.5)Y (NP4>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP4>=2.5) Y (NP2 >=2.5)Y (NP6>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=2.5) Y (NP5 >=2.5)Y (NP6>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=2.5) Y (NP4 >=2.5)Y (NP6>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=2.5) Y (NP4 >=2.5)Y (NP5>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP4>=2.5) Y (NP5 >=2.5)Y (NP6>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=2.5) Y (NP3 >=2.5)Y (NP6>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=2.5) Y (NP3 >=2.5)Y (NP5>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP4>=2.5) Y (NP5 >=2.5)Y (NP6>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=2.5) Y (NP3 >=2.5)Y (NP4>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=2.5) Y (NP2 >=2.5)Y (NP6>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=2.5) Y (NP2 >=2.5)Y (NP5>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=2.5) Y (NP2 >=2.5)Y (NP4>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
SINO
SI (NP1>=2.5) Y (NP2 >=2.5)Y (NP3>=2.5) ENTONCES
ESCRIBA " el estudiante aprobo la asignatura"
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
FIN SI
LLAMAR NUEVA_LINEA
PM <- (NP1+NP2+NP3+NP4+NP5+NP6)/6
SI (PM<3.0)ENTONCES
ESCRIBA " El estudiante reprobo la asignatura"
LLAMAR NUEVA_LINEA
ESCRIBA "EL PROMEDIO ES:", PM
FIN SI
FIN