lOMoARcPSD| 46836766
Ejercicios semana 9:
1.
Proceso ej1 definir zona como
entero definir tiempo
como real
Escribir "Ingrese el codigo de su zona (Estados Unidos, Canada, America del Sur,
America Central, Mexico, Europa, Asia, Africa, Oceania)"
Leer zona
Escribir "Ingrese la duracion de su llamada en
minutos" Leer tiempo segun zona hacer
1 : aea <- tiempo * 0.13
2 : aea <- tiempo * 0.11
5 : aea <- tiempo * 0.22
6 : aea <- tiempo * 0.19
7 ,9 : aea <- tiempo * 0.17
10 : aea <- tiempo * 0.2
15 : aea <- tiempo * 0.39
20 : aea <- tiempo * 0.28
de otro modo: Escribir "Ingrese un codigo valido"
FinSegun escribir "El precio de su llamada
sera: " aea
FinProceso
2.
Proceso ej2
lOMoARcPSD| 46836766
Definir nota Como Entero
Escribir "Digite la nota obtenida"; Leer nota
Segun nota hacer
0: Escribir"Necesita reforzamiento"
1: Escribir"Necesita reforzamiento"
2: Escribir"Necesita reforzamiento"
3: Escribir"Desaprobado"
4: Escribir"Desaprobado"
5: Escribir"Aprobado"
6: Escribir"Aprobado"
7: Escribir"Aprobado"
8: Escribir"Excelente"
9: Escribir"Excelente"
10: Escribir"Becado"
De Otro Modo:
Escribir "Ingrese una nota válida del 1 al 10"
FinSegun
lOMoARcPSD| 46836766
FinProceso
3.
Proceso ej3
Definir x, Lunes, Martes, Miercoles, Jueves, Viernes, Sabado, Domingo como
caracter Escribir "Indique el dia de la semana"; leer x;
Segun x hacer
"Lunes" : escribir "Luna";
"Martes" : escribir "Marte";
"Miercoles" : escribir "Mercurio";
"Jueves" : escribir "Jupiter";
"Viernes" : Escribir "Venus";
lOMoARcPSD| 46836766
"Sabado" : escribir "Saturno";
"Domingo" : escribir "Sol"; de otro modo: Escribir
"Ingrese un dia valido"
FinSegun
FinProceso
Grupo 6
Portocarrero Aleman Victor Jose

Preview text:

lOMoAR cPSD| 46836766 Ejercicios semana 9: 1. Proceso ej1 definir zona como entero definir tiempo como real
Escribir "Ingrese el codigo de su zona (Estados Unidos, Canada, America del Sur,
America Central, Mexico, Europa, Asia, Africa, Oceania)" Leer zona
Escribir "Ingrese la duracion de su llamada en
minutos" Leer tiempo segun zona hacer 1 : aea <- tiempo * 0.13 2 : aea <- tiempo * 0.11 5 : aea <- tiempo * 0.22 6 : aea <- tiempo * 0.19
7 ,9 : aea <- tiempo * 0.17 10 : aea <- tiempo * 0.2 15 : aea <- tiempo * 0.39 20 : aea <- tiempo * 0.28
de otro modo: Escribir "Ingrese un codigo valido"
FinSegun escribir "El precio de su llamada sera: " aea FinProceso 2. Proceso ej2 lOMoAR cPSD| 46836766 Definir nota Como Entero
Escribir "Digite la nota obtenida"; Leer nota Segun nota hacer
0: Escribir"Necesita reforzamiento"
1: Escribir"Necesita reforzamiento"
2: Escribir"Necesita reforzamiento" 3: Escribir"Desaprobado" 4: Escribir"Desaprobado" 5: Escribir"Aprobado" 6: Escribir"Aprobado" 7: Escribir"Aprobado" 8: Escribir"Excelente" 9: Escribir"Excelente" 10: Escribir"Becado" De Otro Modo:
Escribir "Ingrese una nota válida del 1 al 10" FinSegun lOMoAR cPSD| 46836766 FinProceso 3. Proceso ej3
Definir x, Lunes, Martes, Miercoles, Jueves, Viernes, Sabado, Domingo como
caracter Escribir "Indique el dia de la semana"; leer x; Segun x hacer "Lunes" : escribir "Luna"; "Martes" : escribir "Marte";
"Miercoles" : escribir "Mercurio";
"Jueves" : escribir "Jupiter"; "Viernes" : Escribir "Venus"; lOMoAR cPSD| 46836766
"Sabado" : escribir "Saturno";
"Domingo" : escribir "Sol"; de otro modo: Escribir "Ingrese un dia valido" FinSegun FinProceso Grupo 6
Portocarrero Aleman Victor Jose