Hacer un programa de computador que calcule cuanto debe pagar
un usuario en una gasolinera, por una tanqueada teniendo en cuenta que:
Precio del galón de gasolina =$8700
Precio de galón de Diesel=$8100
Proceso PAGAR
CG<-0
TC<-" "
PAGAR<-0
PAGAR2<-0
ESCRIBIR "INGRESE EL VALOR DE LA CANTIDAD DE GALONES"
LEER CG
Si TC = "GASOLINA" Entonces
PAGAR<-CG*8700
Sino
PAGAR2<-CG*8100
Fin Si
ESCRIBIR "EL VALOR A PAGAR ES DE "
FinProceso
En un supermercado quieren ofrecer un descuento del 10%
sobre el valor de la compra a los clientes que adquieran un mercado con valor
superior a 100.000 pesos. Hacer un programa que pida el valor de mercado y muestre el valor final a apagar.
Proceso SUPERMERCADO
VM<-0
Escribir "INGRESE EL VALOR DEL MERCADO"
LEER VM
Si VM>100000 Entonces
D<-VM*0.1
VF<-VM-D
Sino
VF2<-VM
Fin Si
Escribir "VALOR A PAGAR ES ",VF
FinProceso
En una quecillería
tienen que rechazar una compra de leche si el producto contiene más de
un 15% de agua. Hacer un programa los datos necesarios, e indique si una compra
de leche debe ser aceptada
Proceso QUESILLERA
CL<-0
CA<-0
Escribir "INGRESE LA CANTIDAD DE LECHE"
LEER CL
ESCRIBIR "INGRESE LA CANTIDAD DE AGUA"
LEER CA
P<-(CA/CL)/10
Si P<15 Entonces
Escribir "ES ACEPTADA"
Sino
Escribir "ES RECHAZADA"
Fin Si
Escribir "Y CONTIENE UN ",P,"% ","DE AGUA"
FinProceso
En un servicio de urgencias de un hospital requieren un
programa al que se le pueda ingresar la temperatura corporal de un paciente y
si ese paciente presenta fiebre debe indicar que debe ser atendido de
inmediato.
Proceso HOSPITAL
TC<-0
Escribir "INGRESE TEMPERATURA"
Leer TC
Si TC> 35 Entonces
Escribir "DEBE SER ATENTIDO INMEDIATAMENTE"
Sino
Escribir "ES NORMAL"
Fin Si
FinProceso
En una biblioteca se necesita un programa que al momento de
la devolución de un libro pida la fecha de préstamo y la fecha de actual, en
caso de haber pasado más de 10 días, indique que el usuario quede sancionado.
Proceso BIBLIOTECA
DP<-0
MP<-0
AP<-0
DA<-0
MA<-0
AA<-0
ESCRIBIR "INGRESE DIA DE PRESTAMO"
LEER DP
ESCRIBIR "INGRESE MES DE PRESTAMO"
LEER MP
ESCRIBIR "INGRESE AÑO DE PRESTAMO"
LEER AP
ESCRIBIR "INGRESE DIA ACTUAL"
LEER DA
ESCRIBIR "INGRESE MES ACTUAL"
LEER MA
ESCRIBIR "INGRESE AÑO ACTUAL"
LEER AA
TD<-DA-DP
TM<-MA-MP
TA<-AA-AP
D<-(TA*360)+(TM*30)+TD
SI D>10 Entonces
ESCRIBIR "SANCIONADO"
Sino
ESCRIBIR "USUARIO ACTIVO"
FinSi
FinProceso
Hacer un programa que pida el día, el mes y el año actuar y
la fecha límite de pago de la factura Del servicio celular y si el usuario se pasó de la fecha limite le cobre el 1% de
interés por cada día retrazo.
Proceso FACTURA
DA<-0
MA<-0
AA<-0
DP<-0
MP<-0
AP<-0
VF<-15000
ESCRIBIR "INGRESE DIA ACTUAL"
LEER DA
ESCRIBIR "INGRESE MES ACTUAL"
LEER MA
ESCRIBIR "INGRESE AÑO ACTUAL"
LEER AA
ESCRIBIR "INGRESE DIA DE PAGO"
LEER DP
ESCRIBIR "INGRESE MES DE PAGO"
LEER MP
ESCRIBIR "INGRESE AÑO DE PAGO"
LEER AP
TD<-DA-DP
TM<-MA-MP
TA<-AA-AP
D<-(TA*360)+(TM*30)+TD
I<-D*0.01
Si D>0 Entonces
ESCRIBIR "PAGA UN INTERES DE " I*VF
Sino
ESCRIBIR "NO PAGA INTERES"
Fin Si
FinProceso
