UNIVERSIDAD NACIONAL FEDERICO

VILLARREAL

Facultad de Ingeniería Civil

LENGUAJE DE PROGRAMACIÓN DIGITAL

Profesor:
• Yuri Arturo Pomachagua Basualdo

Alumnos:

• Clemente Tapara Diego 2020008578

Sección: “A”

Año
2022
1.Se desea pintar el área total de un tanque de agua que tiene la forma cilíndrica, escribir un
pseudocódigo para calcular el área y el costo de la mano de obra por el pintado de dicho
tanque, si se cobra S/ 25.00 por metro cuadrado.

Proceso pintar_tanque_de_agua

definir radio, altura, costototal, areatotal Como Real

escribir " costo de pintado de un tanque cilindrico"

escribir "-----------"

escribir " ingrese el radio y altura del cilindro "

leer radio, altura

areatotal= 2*3.141592653*radio*(radio + altura)

costototal= areatotal*25

escribir "el area total del cilindro es; " areatotal " metros cuadrados"

escribir "el costo toal del pintado es: " costototal " soles "

FinProceso
2.El precio de un automóvil nuevo para un comprador es la suma total de: el costo del
vehículo, porcentaje de la ganancia del vendedor y de los impuestos aplicables. Suponer una
ganancia del vendedor del 12% en todas las unidades y un impuesto del 6% y diseñar un
algoritmo para mostrar el precio para el comprador

Proceso PrecioAutomovil

Definir precio, ganancia, impuesto, pfinal Como Real

Escribir "Ingresa el precio del automovil"

Escribir "================================"

Leer precio

ganancia = precio*0.12

impuesto= (precio + ganancia)*0.06

pfinal= precio + ganancia + impuesto

Escribir "Ganancia del vendedor es --->", ganancia

Escribir "Impuestos es --->", impuesto

Escribir "Precio final del automovil es --->", pfinal

FinProceso
3.Escriba un programa para calcular el tiempo transcurrido, en minutos, necesario para hacer
un viaje. La ecuación es tiempo transcurrido = distancia total/velocidad promedio. Suponga
que la distancia está en kilómetros y la velocidad en kilómetros/hora

Proceso MinutosParaViaje
Definir tiempo, distanciaTotal, velocidadPromedio Como Real
Escribir "Ingresa el valor de distanciaTotal en km"
Leer distanciaTotal
Escribir "Ingresa el valor de la velocidad promedio en kh"
Leer velocidadPromedio
tiempo= 60.0*distanciaTotal/velocidadPromedio
Escribir "Valor de tiempo transcurrido en minutos es -->", tiempo
FinProceso
4. Calcular la fuerza de atracción entre dos masas, separadas por una distancia, mediante la
siguiente fórmula: F = G*masa1*masa2 / distancia2 Donde G es la constante de gravitación
universal: G = 6.673 * 10-8 cm3/g.seg2

Proceso FuerzaAtracción

Definir distancia, masa1, masa2 Como Real

Escribir "Ingrese el valor de distancia"

Leer distancia

Escribir "Ingrese el valor de masa1"

Leer masa1

Escribir "Ingrese en valor de masa2"

Leer masa2

G= 0.00000006673

F= (G*masa1*masa2)/(distancia^2)

Escribir "El valor de Fuerza de Atracción es --->", F

FinProceso
1 En una empresa le dan a los empleados un subsidio de transporte si el sueldo básico de estos
es menor que el salario mínimo (S/. 700), este subsidio es el 30% del sueldo base. Escribir
pseudocódigo que calcule y muestre el salario neto de un empleado

Proceso SalarioNeto

Definir sueldobasico Como Real

Escribir "Ingresa en valor de Sueldo Basico"

Leer sueldobasico

salminimo= 700

si sueldobasico< salminimo Entonces

subsidio= sueldobasico*0.3

SiNo

subsidio= 0

FinSi

SalNeto= sueldobasico + subsidio

Escribir "Valor del subsidio es --->", subsidio

Escribir "Valor de salario minimo es --->", salminimo

Escribir "Valor de salario neto es --->", SalNeto

FinProceso
2. Ingrese el nombre del trabajador, su sueldo básico y el número de hijos, se deberá mostrar
su bonificación y el sueldo final. Tenga en cuenta que la empresa está dando una bonificación
del 7% del sueldo básico sólo en el caso el trabajador tuviese hijos

Proceso bonificacion

definir sueldobasico, numerohijo Como Real

escribir "ingresar el valor del sueldo basico "

escribir " ingresar el valor de numero de hijos "

leer sueldobasico

Leer numerohijo

si numerohijo > 0 Entonces

bono=sueldobasico*0.07

SiNo

bono=0

FinSi

total_ingresos = sueldobasico + bono

escribir "valor de bono:", bono

escribir " valor de total de sueldo final:", total_ingresos

FinProceso
3 Elaborar un pseudocódigo para determinar si un número es par o impar.

Proceso par_impar

definir num Como Entero

escribir " numero par e impar "

escribir "------"

escribir "ingrese un numero "

leer num

si num mod 2= 0 Entonces

escribir " es par "

sino

escribir " es impar "

FinSi

FinProceso
4.Los trabajadores tienen un sueldo básico y aquellos con más de 10 años de antigüedad
recibirán un bono de 10% de su básico, los demás sólo 5% . Escribir un pseudocódigo para
hallar el bono y total ingresos.

Proceso sueldo_basico_bonificacion

definir sueldobasico, antiguedad Como Real

escribir "ingresar el valor del sueldo basico "

escribir " ingresar el valor de antiguedad "

leer sueldobasico

Leer antiguedad

si antiguedad > 10 Entonces

bono=sueldobasico*0.1

SiNo

bono=sueldobasico*0.05

FinSi

total_ingresos = sueldobasico + bono

escribir "valor de bono:", bono

escribir " valor de total de ingresos:", total_ingresos

FinProceso
1 A un trabajador le descuentan de su sueldo el 10% si su sueldo es menor o igual a 1000, por
encima de 1000 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 un sueldo

Proceso DescuentoySueldo

Definir Sueldo, Descuento Como Real

Escribir "Ingresar el sueldo"

leer Sueldo

si sueldo <= 1000 Entonces

descuento = sueldo*.10

SiNo

si sueldo <= 2000 Entonces

descuento = ((sueldo - 1000) * .05) + 100

SiNo

descuento = ((sueldo - 2000)* .03) + 150

Fin si

FinSi

Escribir " Sueldo $", sueldo

Escribir " Descuento Aplicado: $" ,descuento

Escribir "Sueldo Neto: $", sueldo - descuento

FinProceso
2. Calcular la comisión sobre las ventas totales de un empleado, sabiendo que el empleado no
recibe comisión si su venta es hasta S/.150, si la venta es superior a S/.150 y menor o igual a
S/.400 el empleado recibe una comisión del 10% de las ventas y si las ventas son mayores a
400, entonces la comisión es de S/.50 más el 9% de las ventas

Proceso ComisionVentas

Definir ventas, comision Como Real

Escribir "Ingresa el valor de venta: ";

Leer venta;

comision <- 0;

Si venta >150 Y venta <=400 Entonces

comision <- venta*0.1;

FinSi

Si venta > 400 Entonces

comision <- venta*0.09+50;

FinSi

Escribir "Valor de Comision: ", comision;

FinProceso
3 Un Supermercado necesita determinar el descuento para un cliente. Si el monto de la
compra del cliente es mayor de S/. 5000 se le hará un descuento del 30%, si es menor o igual a
S/. 5000 pero mayor que S/. 3000 será del 20%, si no rebasa los S/. 3000 pero si los S/. 1000 la
rebaja efectiva es del 10% y en caso de que no rebase los S/. 1000 no tendrá beneficio.

Proceso SuperMercado

Definir MontodelaCompra,descuento Como Real

Escribir "Ingresa el valor de monto de la compra:";

Leer monto_de_la_compra;

descuento <- 0;

Si monto_de_la_compra>5000 Entonces

descuento <- monto_de_la_compra*0.3;

FinSi

Si monto_de_la_compra<=5000 Y monto_de_la_compra>3000 Entonces

descuento <- monto_de_la_compra*0.2;

FinSi

Si monto_de_la_compra<=3000 Y monto_de_la_compra>1000 Entonces

descuento <- monto_de_la_compra*0.1;

FinSi

Escribir "Valor de descuento: ", descuento;

FinProceso
1 Calcular el pago por ciclo de un alumno de una Universidad, si se ingresan, créditos inscritos,
categoría, matricula (1: normal, 2: extemporánea). El pago por crédito depende de la categoría
de acuerdo a la siguiente tabla: CATEGORÍA PAGO CREDITO A 125.00 B 150.00 C 180.00 Por
matricula extemporánea se paga un recargo de 40.00 soles.

Proceso PagoPorCiclo

Definir pciclo, creditos Como Real

Definir matricula, categoría Como Entero

Escribir "tipo de matricula"

Escribir "1: Normal"

Escribir "2: extemporánea"

Escribir "Escoger tipo de matricula"

Leer matricula

Escribir "categoría"

Escribir "1: categoría A"

Escribir "2: categoría B"

Escribir "3: categoría C"

Escribir "Escoger una categoría"

Leer categoría

Escribir "Ingrese la cantidad de créditos"

Leer creditos

Segun matricula Hacer

1:

Segun categoría Hacer

1:

pciclo= creditos*125

2:

pciclo= creditos*150

3:

pciclo= creditos*180

De Otro Modo:

Escribir "La categoríaingresada no existe"

FinSegun

2:
 Segun categoría Hacer

1:

pciclo= (creditos*125)+40

2:

pciclo=(creditos*150)+40

3:

pciclo=(creditos*180)+40

De Otro Modo:

Escribir "La categoría ingresada no existe"

FinSegun

FinSegun

Escribir "El costo del ciclo es --->", pciclo

FinProceso
2. En un hospital se ha hecho un estudio sobre los pacientes registrados durante los últimos 10
años, con el objeto de hacer una aproximación de los costos de internamiento por paciente. Se
obtuvo un costo promedio diario según el tipo de enfermedad que aqueja al paciente, además
se pudo determinar que en promedio todos los pacientes con edad entre 14 y 22 años implican
un costo adicional del 10%. La siguiente tabla expresa los costos diarios según el tipo de
enfermedad. TIPO DE ENFERMEDAD COSTO /PACIENTE 0 25 1 16 2 20 3 32 Calcular e imprimir
el costo que representa un paciente

Proceso Hospital

Definir costo, TipodeEnfermedad Como Real

Escribir "Ingresa el valor de edad:";

Leer edad;

Escribir "Ingresa el valor de tipo de enfermedad:";

Leer tipodeenfermedad;

costo <- 0;

Si tipodeenfermedad = 0 Entonces

costo <- 25;

FinSi

Si tipodeenfermedad = 1 Entonces

costo <- 16;

FinSi

Si tipodeenfermedad = 2 Entonces

costo <- 20;

FinSi

Si tipodeenfermedad = 3 Entonces

costo <- 32;

FinSi

Si edad >= 14 Y edad <= 22 Entonces

costo <- costo*1.1;

FinSi

Escribir "Valor de costo: ", costo;