S09
1.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ú
Clave Zona Precio por minuto
1 Estados Unidos 0.13
2 Canadá 0.11
5 América del Sur 0.22
6 América Central 0.19
7 México 0.17
9 Europa 0.17
10 Asia 0.20
15 África 0.39
20 Oceanía 0.28
proceso BUU
definir clave,min Como Entero
definir pm Como Real
escribir"/////clave segun pais/////"
escribir" estados unidos: 1"
escribir" canada : 2"
escribir" america del sur : 5"
escribir" america central : 6"
escribir" mexico : 7"
escribir" europa : 9"
escribir" asia : 10"
escribir" africa : 15"
escribir" oceania : 20"
escribir"ingresa la clave"; leer clave
escribir "ingrese los minutos de llamada"; leer min
segun clave hacer
1: pm<-min*0.13
2: pm<-min*0.11
5: pm<-min*0.22
6: pm<-min*0.19
7: pm<-min*0.17
9: pm<-min*0.17
10: pm<-min*0.20
15: pm<-min*0.39
20: pm<-min*0.28
FinSegun
escribir "el costo de la llamada es: " pm
FinProceso
