Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                

Prog Digital Lab Sesion 04

Descargar como pdf o txt
Descargar como pdf o txt
Está en la página 1de 22

PROGRAMACION DIGITAL

LABORATORIO 04
Dr. Fernando Mendoza Apaza
PROCESOS CONDICIONALES
PROCESOS CONDICIONALES MULTIPLES
ESTRUCTURAS SELECTIVAS
Algoritmo general
definir variable1 como numerico;
definir variable2 como entero;
definir variable3 como cadena;
definir variable4 como caracter;

Escribir "Ingrese un Valor :";


Leer variable1;
Escribir "Ingrese un Valor :";
Leer variable2;
Escribir "Ingrese un Valor :";
Leer variable3;
Escribir "Ingrese un Valor :";
Leer variable4;
variable1<-variable2*2;
Si variable1<variable2 Entonces
variable3<-"Proceso Verdadero";
SiNo
variable3<-"Proceso Falso";
Fin Si
Escribir variable3;

Segun variable2 Hacer


1:
Escribir "Proceso Opcion 1:";
2:
Escribir "Proceso Opcion 2:";
3:
Escribir "Proceso Opcion 2:";
De Otro Modo:
Escribir "Ningun Proceso Opcion:";
Fin Segun

Segun variable4 Hacer


'a':
Escribir "Proceso Opcion a:";
'b':
Escribir "Proceso Opcion b:";
'c':
Escribir "Proceso Opcion c:";
De Otro Modo:
Escribir "Ningun Proceso Opcion:";
Fin Según
FinAlgoritmo
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.
Algoritmo menusimple
definir categoria como caracter;
definir credito, cantidad,tipo, recargo, total como entero;
Escribir "Ingresar Tipo de matricula :";
leer tipo;
Escribir "Ingresar la categoria :";
leer categoria;
Escribir "Ingresar la cantidad de creditos: ";
Leer cantidad;
Segun tipo Hacer
caso 1:
recargo<-0;
caso 2:
recargo<-40;
Fin Segun
Segun categoria Hacer
caso 'a':
credito<-125;
caso 'b':
credito<-150;
caso 'c':
credito<-180;
De Otro Modo:
credito<-0;
Fin Segun
total<-cantidad*credito+recargo;
Escribir "creditos: ", credito;
Escribir "El pago total : ", total;
FinAlgoritmo
Algoritmo menusimple
definir categoria como caracter;
definir credito, cantidad,tipo, recargo, total como entero;
Escribir "Ingresar Tipo de matricula :";
leer tipo;
Escribir "Ingresar la categoria :";
leer categoria;
Escribir "Ingresar la cantidad de creditos: ";
Leer cantidad;
Segun tipo Hacer
caso 1:
recargo<-0;
caso 2:
recargo<-40;
Fin Segun
Segun categoria Hacer
caso 'a':
credito<-125;
caso 'b':
credito<-150;
caso 'c':
credito<-180;
De Otro Modo:
credito<-0;
Fin Segun
total<-cantidad*credito+recargo;
Escribir "creditos: ", credito;
Escribir "El pago total : ", total;
FinAlgoritmo
algoritmo menu
definir categoria,a,b,c como cadena;
definir credito, cantidad, tipo, recargo, total como numerico;
Escribir "MATRICULA UNAC 2020-I";
Escribir " 1:normal recargo=0, 2:extemporánea recargo=40";
Escribir " CATEGORIA PAGO CREDITO";
Escribir " A 25 S/. ";
Escribir " B 50 S/. ";
Escribir " C 80 S/. ";
Escribir "Ingresar Tipo de matricula :";
leer tipo;
Escribir "Ingresar la categoria :";
leer categoria;
Escribir "Ingresar la cantidad de creditos: ";
Leer cantidad;
Segun tipo Hacer
caso 1: recargo<-0;
caso 2: recargo<-100;
FinSegun
Segun categoria Hacer
caso 'a': credito<-25;
caso 'b': credito<-50;
caso 'c': credito<-80;
De Otro Modo: credito<-0;
FinSegun
total<-cantidad*credito+recargo;
Escribir "Costo creditos: ", credito," Recargo : ",recargo;
Escribir "El pago total : ", total;
finalgoritmo
algoritmo menu
definir categoria,a,b,c como cadena;
definir credito, cantidad, tipo, recargo, total como numerico;
Escribir "MATRICULA UNAC 2020-I";
Escribir " 1:normal recargo=0, 2:extemporánea recargo=40";
Escribir " CATEGORIA PAGO CREDITO";
Escribir " A 25 S/. ";
Escribir " B 50 S/. ";
Escribir " C 80 S/. ";
Escribir "Ingresar Tipo de matricula :"; leer tipo;
Escribir "Ingresar la categoria :"; leer categoria;
Escribir "Ingresar la cantidad de creditos: "; Leer cantidad;
Segun tipo Hacer
caso 1: recargo<-0;
caso 2: recargo<-100;
FinSegun
Segun categoria Hacer
caso 'a': credito<-25;
caso 'b': credito<-50;
caso 'c': credito<-80;
De Otro Modo: credito<-0;
FinSegun
total<-cantidad*credito+recargo;
Escribir "Costo creditos: ", credito," Recargo : ",recargo;
Escribir "El pago total : ", total;
finalgoritmo
algoritmo MenuYogurt
definir cantidad, precio, descuento como numerico;
definir importecompra, importedescuento, importepago como numerico;
definir marca como caracter;
escribir "Ingrese el Producto a elegir La marca: ";
escribir "MARCA PRECIO ";
escribir "[L]aive S/.3.90 unidad ";
escribir "[G]loria S/.3.80 unidad ";
escribir "[P]ura Vida S/.4.20 unidad ";
escribir "[M]lkito S/.3.60 unidad ";
leer marca;
Segun marca Hacer
caso 'L' o 'l':
precio<-3.90;
caso 'G' o 'g':
precio<-3.80;
caso 'P' o 'p':
precio<-4.20;
caso 'M' o 'm':
precio<-3.60;
De Otro Modo:
precio<-0;
FinSegun
escribir "Ingrese cantidad de botellas";
leer cantidad;

si cantidad<15 entonces
descuento<-4/100;
sino
si cantidad<30 entonces
descuento<-6.5/100;
sino
si cantidad<45 entonces
descuento<-9/100;
sino
si cantidad>=45 entonces
descuento<-11.5/100;
finsi
finsi
finsi
finsi
importecompra<-cantidad*precio;
importedescuento<-importecompra*descuento;
importepago<-importecompra-importedescuento;
escribir"IMPORTE COMPRA: ",importecompra," S/.";
escribir"IMPORTE DESCUENTO: ",importedescuento," S/.";
escribir"IMPORTE PAGO: ",importepago," S/.";
FinAlgoritmo
algoritmo MenuYogurt
definir cantidad, precio, descuento como numerico;
definir importecompra, importedescuento, importepago como numerico;
definir marca como caracter;
escribir "Ingrese el Producto a elegir La marca: ";
escribir "MARCA PRECIO ";
escribir "[L]aive S/.3.90 unidad ";
escribir "[G]loria S/.3.80 unidad ";
escribir "[P]ura Vida S/.4.20 unidad ";
escribir "[M]lkito S/.3.60 unidad ";
leer marca;
Segun marca Hacer
caso 'L' o 'l':
precio<-3.90;
caso 'G' o 'g':
precio<-3.80;
caso 'P' o 'p':
precio<-4.20;
caso 'M' o 'm':
precio<-3.60;
De Otro Modo:
precio<-0;
FinSegun
escribir "Ingrese cantidad de botellas";
leer cantidad;

si cantidad<15 entonces
descuento<-4/100;
sino
si cantidad<30 entonces
descuento<-6.5/100;
sino
si cantidad<45 entonces
descuento<-9/100;
sino
si cantidad>=45 entonces
descuento<-11.5/100;
finsi
finsi
finsi
finsi
importecompra<-cantidad*precio;
importedescuento<-importecompra*descuento;
importepago<-importecompra-importedescuento;
escribir"IMPORTE COMPRA: ",importecompra," S/.";
escribir"IMPORTE DESCUENTO: ",importedescuento," S/.";
escribir"IMPORTE PAGO: ",importepago," S/.";
FinAlgoritmo
PROBLEMAS PROPUESTOS
P1. Un consorcio automotriz ofrece 3 tipos de financiamiento para la venta de sus vehículos. Para un tipo de financiamiento en
particular se desea saber el monto de compra, impuestos, monto de factura e interés que se deberán pagar, así como el nuevo
monto de factura, cuota inicial monto por letra y el número de letras que corresponda. Tome en cuenta información de siguiente
tabla:
Para todos los casos los impuestos representan el 18% del monto de la compra.

TIPO DE FINANCIAM. INTERES MENSUAL CUOTA INICIAL Nº LETRAS

A 5% 60% 2
B 10% 50% 4
C 15% 35% 6

P2. Una tienda ha puesto en oferta la venta de packs de galletas a los precios dados en la
siguiente tabla:

Diseñe un programa que determine el importe a pagar por la compra de cierta cantidad de golosinas del
mismo tipo.
P3. En la ciudad de Lima, una agencia de seguros para automóviles asigna costos basados en el sexo y la edad del
conductor. Los varones menores de 25 años pagan los precios más altos, 1000 soles. Los hombres de 25 años a
más pagan 700 soles. Las mujeres de menos de 21 años ó más pagan 500 soles. Escribe el algoritmo del programa
que imprima la edad del conductor, sexo y el pago correspondiente para los clientes de la aseguradora.

P4. Usando SEGÚN: Realiza un algoritmo que lea un número y mostrar si es positivo, negativo o cero
de un rango de -15 a +15
P5. leer un número (representa a un mes) e indicar la cantidad de días que posee

P6. Una heladería vende helados a los siguientes precios

Tipo Helado Precio


1 Sol S/. 1.5
2 Fresa S/. 2.0
3 Mar S/. 1.7
4 Rico S/. 2.5
Calcular el importe a pagar por cierta cantidad de helados del mismo tipo

P7. Multicines, ofrece los siguientes precios en sus entradas de acuerdo a la siguiente tabla de
precios.
Días Precio
L,M,X,J S/. 2.5
V,S S/. 3.0
D S/. 7.0
Realiza una aplicación que calcule y muestre el total a pagar por una cantidad de entradas en un
día determinado. Considera que si compra más de 6 entradas tendrá un descuento del 10% de
dicho monto.
P8. Ingresar un número entero de dos cifras y mostrar su valor en letras.

P9. Calculadora Suma, Resta: Multiplicación y División

P10.
Presentación:
• Correo Docente: MENDOZA APAZA FERNANDO
• fmendozaa@unac.edu.pe

• ASUNTO DE ENTREGA:
• Laboratorios:
ASUNTO: PROG DIGITAL-01L-90G-SESION-01-Apepat Apemat Nombres
• Tareas:
ASUNTO: PROG DIGITAL-01L-SESION-01-Apepat Apemat Nombres
• Practicas:
PROG DIGITAL-01L-PRACTICA01-Apepat Apemat Nombres
• Exámenes Parcial/Final:
PROG DIGITAL-01L-EXAMEN PARCIAL/FINAL-Apepat Apemat Nombres
PLAZO DE ENTREGA: 03 dias
11:59:59 PM
PROGRAMACION DIGITAL
LABORATORIO 04
Dr. Fernando Mendoza Apaza

También podría gustarte