TAREA 6 1. Realice un programa tal que, al ingresar un carácter, determine si éste es una vocal en mayúscula o minúscula, o es una consonante. Proceso caracter definir letra Como Caracter escribir "ingrese letra" leer letra segun opc hacer ["A"]:ESCRIBIR "MAYUSCULA" [a]:ESCRIBIR "MINUSCULA" EN OTRO CASO: ESCRIBIR "CONSONANTE"
FinSegun FinProceso
2.Realizar un programa que permita ingresar un número correspondiente a los meses del año y muestre el último día del mes.
Proceso meses definir MES COMO REAL ESCRIBIR "INGRESAR MES " ESCRIBIR "[1]ENERO" ESCRIBIR "[2]FEBRERO" ESCRIBIR "[3]MARZO" ESCRIBIR "[4]ABRIL" ESCRIBIR "[5]MAYO" ESCRIBIR "[6]JUNIO" ESCRIBIR "[7]JULIO" ESCRIBIR "[8]AGOSTO" ESCRIBIR "[9]SEPTIEMBRE" ESCRIBIR "[10]OCTUBRE" ESCRIBIR "[11]NOVIEMBRE" ESCRIBIR "[12]DICIEMBRE" LEER MES SEGUN MES Hacer 1 :UD <-31 ESCRIBIR "ULTIMO DIA DEL MES ES" UD 2 :UD <-30 ESCRIBIR "ULTIMO DIA DEL MES ES" UD 3 :UD <-31 ESCRIBIR "ULTIMO DIA DEL MES ES" UD 4 :UD <-30 ESCRIBIR "ULTIMO DIA DEL MES ES" UD
5 :UD <-31 ESCRIBIR "ULTIMO DIA DEL MES ES" UD 6:UD <-30 ESCRIBIR "ULTIMO DIA DEL MES ES" UD 7 :UD <-31 ESCRIBIR "ULTIMO DIA DEL MES ES" UD 8 :UD <-31 ESCRIBIR "ULTIMO DIA DEL MES ES" UD 9 :UD <-30 ESCRIBIR "ULTIMO DIA DEL MES ES" UD 10 :UD <-31 ESCRIBIR "ULTIMO DIA DEL MES ES" UD 11 :UD <-30 ESCRIBIR "ULTIMO DIA DEL MES ES" UD 12 :UD <-31 ESCRIBIR "ULTIMO DIA DEL MES ES" UD DE Otro Modo: ESCRIBIR "MES NO VALIDO" FinSegun FinProceso
3. Construya un pseudocódigo, que permita calcular el valor de f(x) según la siguiente expresión:
Algoritmo hallar
definir x , opc Como Entero escribir "ingrese x " leer x opc <- x mod 4 Segun opc hacer 0: fx<-x^3 1: fx<- ((x^2)-4)/x^3 2:fx<-(x^3)+5 3:fx<-0
De otro modo : escribir "error" Fin segun escribir "fx es igual a " fx Fin segun
FinAlgoritmo
4. Una empresa de telecomunicaciones canadiense ofrece servicio de callback a un precio atractivo. El costo de las llamadas telefónicas depende tanto del lugar de origen de la llamada como de la zona geográfica en la que se encuentre el país destino. En la siguiente tabla se presenta el costo por 60 segundos para las llamadas originadas en Perú. Realice un programa que le permita calcular e imprimir el costo total de una llamada telefónica, considerando tanto la zona como la duración de la llamada.
Algoritmo llamada DEFINIR TL , OPC COMO ENTERO ESCRIBIR "[1] ESTADOS UNIDOS" ESCRIBIR "[2] CANADA" ESCRIBIR "[5] AMERICA DEL SUR" ESCRIBIR "[6] AMERICA CENTRAL"
ESCRIBIR "[7] MEXICO" ESCRIBIR "[9] EUROPA" ESCRIBIR "[10] ASIA" ESCRIBIR "[15] AFRICA" ESCRIBIR "[20] OCEANIA" ESCRIBIR " INGRESE TL , OPC " LEER TL , OPC SEGUN OPC HACER : 1: CL <- (TL *0.3)/60 2: CL <- (TL *0.11)/60 5: CL <- (TL *0.22)/60 6: CL <- (TL *0.19)/60 7: CL <- (TL *0.17)/60 9: CL <- (TL *0.17)/60 10: CL <- (TL *0.20)/60 15: CL <- (TL *0.39)/60 20: CL <- (TL *0.28)/60 DE OTRO MODO : ESCRIBIR " OPC NO VALIDA " ESCRIBIR " EL COSTO TOTAL DE LA LLAMADA ES " CL FIN SEGUN FinAlgoritmo
5. En un spa de Ixtapan de la Sal, realizaron un análisis de los clientes registrados en los últimos 5 años, con el objeto de conocer de los gastos de internación de cada cliente. Construya un Seudocódigo que calcule el costo de internación de un cliente, según los datos de la siguiente tabla. Se sabe que los clientes mayores de 60 años tienen un descuento del 25% y los clientes menores de 25 años, de 15%.
Proceso SPA definir OPCT ,EDAD,DIAS Como Real ESCRIBIR "INGRESE OPCT,E,DIAS" LEER TP,E,DIAS SI E > 60 entonces D<-0.25*C FIN SI SI E <25 ENTONCES D<-0.15*C FinSi
SEGUN OPCT HACER 1:C<-2800*DIAS CT<- C-D 2:C<-1950*DIAS CT<- C-D
3:C<-2500*DIAS CT<- C-D
4: C <-1150*DIAS
CT<- C-D
ESCRIBIR "EL COSTO TOTAL ES IGUAL" CT DE OTRO MODO: ESCRIBIR "OPCION NO VALIDA"
FinSegun FinProceso
6. Hacer un seudocódigo que imprima el nombre de un artículo, clave, precio original y su precio con descuento. El descuento lo hace en base a la clave, si la clave es 1 el descuento es del 10% y si la clave es 2 el descuento es del 20% (solo existen dos c laves).
Proceso CLAVES ESCRIBIR "NOMBRE DEL ARTICULO " LEER NA DEFINIR OPCC , PA Como Entero ESCRIBIR " INGRESAR OPCC , PA " LEER OPCC, PA SEGUN OPCC HACER [1] : D<- 0.10*PA PT <- PA-D [2] : D<- 0.20*PA PT <- PA-D DE OTRO MODO : ESCRIBIR " CLAVE INCORRECTA " FIN Segun ESCRIBIR " EL PRECIO CON DESCUENTO ES " PT
FinProceso
7. Escriba un seudocódigo que calcule el importe a pagar por un vehículo al circular por una autopista. El vehículo puede ser una bicicleta, una moto, un coche, o un camión. Para definir el conjunto vehículos utilizaremos un tipo enumerado. El importe se calculará según los siguientes datos: Un importe fijo de 100 soles para las bicicl etas
Las motos y los carros pagarán 30 soles por Km.
Los camiones pagarán 30 soles por Km más 25 soles por Toneladas La presentación en
pantalla de la solución, será de la forma siguiente: 1. Bicicleta 2. Moto 3. Carro 4. Camión 5. Salir Algoritmo TRANSPORTE DEFINIR ER,OPC COMO ENTERO ESCRIBIR "[1] BICICLETA " ESCRIBIR "[2] MOTO " ESCRIBIR "[3] CARRO " ESCRIBIR "[4] CAMION " ESCRIBIR "[5] SALIR " ESCRIBIR "INGRESE ER ,OPC " LEER ER ,OPC SEGUN OPC HACER : 1: IT<- ER*100 2: IT<-ER*30 3:IT<-ER*30 4: ESCRIBIR "INGRESAR T " LEER T IT <-(ER*30) +(T *25)
DE OTRO MODO: ESCRIBIR " SALIR " ESCRIBIR " EL IMPORTE A PAGAR ES " IT FIN SEGUN
FinAlgoritmo
8. Escriba un seudocódigo tal, que dados como datos el modelo de un vehículo y su precio, determine el valor final que debe pagar el comprador. El concesionario está haciendo descuentos teniendo en cuenta el modelo, con base en la siguiente tabla :
Haga uso de una enumeración. Defínala como un nuevo tipo. Además, una por defecto que imprima “El modelo no es válido”
Algoritmo modelo Definir opcm , precio como real Escribir " ingrese opcm , precio " ESCRIBIR " [1] cutlass " ESCRIBIR " [2] cavalier" ESCRIBIR " [3] chevy " ESCRIBIR " [4] century " leer opcm , opcion segun opcm hacer :
1: D<- 0.08* precio pt <- precio - D 2: D<- 0.05* precio pt <- precio - D 3: D<- 0.06* precio pt <- precio - D 4: D<- 0.09* precio pt <- precio - D de otro modo : escribir " El modelo no es válido " escribir " el precio total es " pt
FinSegun
FinAlgoritmo
