EJERCICIOS EN CLASE

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