ACTIVIDAD 03
ALUMNO: AMBROSIO SEVILLANO JESSICA ASTRID
Ciclo: III Sección :”A” Turno: Diurno
DISEÑAR EL ALGORITMO ESCRITO Y GRÁFICO DE LOS SIGUIENTES
EJERCICIOS
1. Dada las horas trabajadas de una persona y el valor por hora. Calcular su
salario e imprimirlo.
Proceso cal_salario
Definir horas_trabaj Como entero;
Definir valor_hora como entero;
Definir salario como entero;
escribir "ingrese h_trabaj";
leer horas_trabaj ;
escribir "ingrese el valor_hora";
leer valor_hora;
salario <-horas_trabaj*valor_hora;
escribir"salario total es:",salario;
finproceso
2. A un trabajador le pagan según sus horas trabajadas y la tarifa está a un
valor por hora. Si la cantidad de horas trabajadas es mayor a 40 horas, la
tarifa por hora se incrementa en un 50% para las horas extras. Calcular el
salario del trabajador dadas las horas trabajadas y la tarifa.
[Link] calcular_salario
Definir h_trabaj Como entero;
Definir v_hora como entero;
Definir h_extras como entero;
Definir salario como real;
escribir"ingrese h_trabaj";
leer h_trabaj;
escribir"ingrese v_hora";
leer v_hora;
escribir"ingrese h_extras";
leer h_extras;
si(h_trabaj>40) Entonces
salario<-(h_trabaj*horas_t)/0.5;
escribir"su salario es:",salario;
Sino
salario<-(h_trabaj*v_hora);
escribir"su salario es:",salario;
FinSi
FinProceso
3. A un trabajador le descuentan de su sueldo el 10% si su sueldo es menor o
igual a 1000, por encima de 1000 y hasta 2000 el 5% del adicional, y por
encima de 2000 el 3% del adicional. Calcular el descuento y sueldo neto que
recibe el trabajador dado su sueldo.
Proceso Salario_Descuento
definir pago_total como real;
definir descuento como real;
definir salario_mes como real;
Escribir "Ingrese suieldo de Trabajador";
Leer salario_mes;
si salario_mes <= 1000 entonces
descuento <- salario_mes * 0.10;
FinSi
si salario_mes >1000 && salario_mes <=2000 Entonces
descuento <- salario_mes * 0.15;
FinSi
si salario_mes > 2000 Entonces
descuento <- salario_mes * 0.18;
FinSi
pago_total <- salario_mes - descuento;
Escribir "El descuento que recibe el trabajador es: " , descuento;
Escribir "El sueldo que recibe el trabajador es: " , pago_total;
FinProceso
4. Dado un monto calcular el descuento considerando que por encima de 100
el descuento es el 10% y por debajo de 100 el descuento es el 2%.
Proceso Descuento_Encima_Debajo
definir monto_inicial como real;
definir calculo_descuento como real;
definir monto_final como real;
Escribir "Ingrese monto inicial por favor: ";
leer monto_inicial;
si monto_inicial >=100 Entonces
calculo_descuento <- monto_inicial * 0.10;
Sino
calculo_descuento <- monto_inicial * 0.02;
FinSi
monto_final <- monto_inicial - calculo_descuento;
Escribir "EL monto final es:", monto_final;
FinProceso
5. Dado un tiempo en minutos, calcular los días, horas y minutos que le
corresponden.
Proceso tiempo_mnts
definir DS,hora,mnts como entero;
escribir"introduce hora";
leer hora;
Escribir "introduce mnts";
leer mnts;
Escribir"introduce DS";
leer DS;
Si mnts>=1440
Entonces
mnts<-mnts-1440;
DS<-DS+1;
FinSi
Si mnts>=60
Entonces
mnts<-mnts-60;
hora<-hora+1;
si hora=24
Entonces
DS<-DS+1;
hora<-hora-24;
FinSi
FinSi
Escribir"el tiempo en mnts es:",mnts;
escribir"el resultado en DS es:",DS;
escribir"el resultado en hora es :" hora;
FinProceso
6. Se trata de escribir el algoritmo que permita emitir la factura
correspondiente a una compra de un artículo determinado, del que se
adquieren una o varias unidades. El IGV es del 19% y si el precio bruto
(precio venta más IGV) es mayor de $13000 se debe realizar un descuento
del 5%.
Proceso Factura_pago_igv_total
definir precio_producto como real;
definir cantidad_art_compra como real;
definir descuento_compra como real;
definir igv como real;
definir pago_total_compra como real;
definir pago_final_01 como real;
definir pago_bruto como real;
definir pago_final como real;
igv <- 0.19;
escribir "Ingrese la cantidad de articulos a comprar: ";
leer cantidad_art_compra;
Escribir "Ingrese precio del articulo a comprar: ";
leer precio_producto;
pago_bruto <- cantidad_art_compra * precio_producto;
pago_total_compra <- pago_bruto * igv;
pago_final_01 <- pago_total_compra + pago_bruto;
si pago_final_01 > 13000 Entonces
descuento_compra <- pago_final_01 *0.05;
pago_final <- descuento_compra + pago_final_01;
Sino
pago_final <- pago_final_01;
FinSi
Escribir "El pago final a realizar es:",pago_final;
FinProceso
7. El director de una escuela está organizando un viaje de estudios, y requiere
determinar cuánto debe cobrar a cada alumno y cuánto debe pagar a la
compañía de viajes por el servicio. La forma de cobrar es la siguiente: si son
100 alumnos o más, el costo por cada alumno es de $65.00; de 50 a 99
alumnos, el costo es de $70.00, de 30 a 49, de $95.00, y si son menos de
30, el costo de la renta del autobús es de $4000.00, sin importar el número
de alumnos. Realice un algoritmo que permita determinar el pago a la
compañía de autobuses y lo que debe pagar cada alumno por el viaje
(represente en pseudocódigo, diagrama de flujo y diagrama N/S la solución).
Al realizar un análisis del problema, se puede deducir que las variables que
se requieren como datos son el número de alumnos (NA), con lo que se
puede calcular el pago por alumno (PA) y el costo total del viaje (TOT).
Proceso Viaje_Alumno_Total
definir cantidad_alumnos como real;
definir costo_pasaje como real;
definir pago_total_pasajes como real;
definir pago_final_pasajes como real;
Escribir "Ingrese la cantidad de alumnos que van a a viajar";
leer cantidad_alumnos;
si cantidad_alumnos >= 100 entonces
costo_pasaje <- 65.00;
FinSi
si cantidad_alumnos >= 50 && cantidad_alumnos <=99 entonces
costo_pasaje <- 70.00;
FinSi
si cantidad_alumnos >= 30 && cantidad_alumnos <=49 entonces
costo_pasaje <- 95.00;
FinSi
si cantidad_alumnos <= 30 entonces
costo_pasaje <- 4000;
FinSi
pago_final_pasajes <- costo_pasaje * cantidad_alumnos;
Escribir "El monto total a pagar por los pasajes de los alumnos es :
",pago_final_pasajes;
FinProceso
8. El consultorio del Dr. Lorenzo T. Mata Lozano tiene como política cobrar la
consulta con base en el número de cita, de la siguiente forma:
• Las tres primeras citas a $200.00 c/u.
• Las siguientes dos citas a $150.00 c/u.
• Las tres siguientes citas a $100.00 c/u.
• Las restantes a $50.00 c/u, mientras dure el tratamiento.
Se requiere un algoritmo para determinar:
a) Cuánto pagará el paciente por la cita.
b) El monto de lo que ha pagado el paciente por el tratamiento.
Para la solución de este problema se requiere saber qué número de cita se
efectuará, con el cual se podrá determinar el costo que tendrá la consulta y cuánto
se ha gastado en el tratamiento.
Proceso pago_por_cita
definir cantidad_citas_paciente como real;
definir pago_total_tratamiento como entero;
definir pago_cita como real;
Escribir "Introduce la cantidad de citas del paciente";
leer cantidad_citas_paciente;
// pago_cita:50.00
segun cantidad_citas_paciente hacer
1,2,3: pago_cita <- 200.00;
4,5: pago_cita <- 150.00;
6,7,8: pago_cita <- 100.00;
De Otro Modo:
pago_cita <- 50.00;
FinSegun
pago_total_tratamiento <- pago_cita * cantidad_citas_paciente;
Escribir "El paciente por cada cita pagarà: ", pago_total_tratamiento;
FinProceso
9. Diseñar el algoritmo escrito y gráfico para un programa que escriba el nombre
del mes, de acuerdo al orden de su sucesión en el año. Debemos tener presente
que: 1(Enero), 2(Febrero) hasta el mes de 12(Diciembre)
Proceso mostrar_mes
definir mes como caracter;
definir n_mes como entero;
escribir"introduce mes";
leer mes;
escribir"introduce n_mes";
leer n_mes;
si (1<-12)
segun mes HACER;
n_mes <-1: mes <- "Enero";
n_mes <- 2: mes <- "Febrero";
n_mes <-3: mes <- "Marzo";
n_mes <-4: mes <- "Abril";
n_mes <-5: mes <- "Mayo";
n_mes <-6: mes <- "Junio";
n_mes <-7: mes <- "Julio";
n_mes <-8: mes <- "Agosto";
n_mes <-9: mes <- "Septiembre";
n_mes <-10: mes <- "Octubre";
n_mes <-11: mes <- "Noviembe";
n_mes <-12: mes <- "Diciembre";
FIN segun
mes <- "";
FIN SI
escribir" el mes es:" , mes;
escribir "el n_mes es:" , n_mes;
FinProceso
10. Diseñar el algoritmo escrito y gráfico donde nos permita ingresar 3 notas de un
alumno para lo cual su promedio lo debe clasificar de la siguiente forma (A-F)
y que emita el mensaje correspondiente de acuerdo a la siguiente tabla:
A. Excelente
B. Buena
C. Regular
D. Suficiente
E. No suficiente
Proceso Rendimiento_Alumno
definir n1,n2,n3 como real;
definir promedio_notas como real;
definir letras_asignacion como caracter;
Escribir "Ingrese las notas de los alumnos";
leer n1;
Escribir "Ingrese las notas de los alumnos";
leer n2;
Escribir "Ingrese las notas de los alumnos";
leer n3;
promedio_notas <- n1+n2+n3/3;
segun promedio_notas hacer
1,2,3,5,6,7,8,9,10: Escribir "NO SUFICIENTE";
11,12,13: letras_asignacion <- "SUFICIENTE";
14,15,16: letras_asignacion <- "REGULAR";
17,18: letras_asignacion <- "BUENA";
19,20: letras_asignacion <- "EXCELENTE";
De Otro Modo:
letras_asignacion <- "gracias";
FinSegun
Escribir "el prom es : ", promedio_notas;
Escribir "El alumno es: ", letras_asignacion;
FinProceso
Nota:
“Por favor no responder en este documento porque
perjudica a sus compañeros”