INFORMATICA Ejercicios
CAR2809Apuntes2 de Diciembre de 2022
4.750 Palabras (19 Páginas)146 Visitas
Ejercicios
1.- Proceso Promedio
Escribir "Hola"
Escribir "Ingresa el primer nùmero"
Leer num
Escribir "Ingresa el segundo nùmero"
Leer num2
Escribir "Ingresa el tercer nùmero"
Leer num3
Escribir "Ingresa el ùltimo nùmero"
Leer num4
prom<- (num + num2 +num3 +num4)/4
Escribir "Tu promedio es" prom
Leer prom
Escribir "Adios"
FinProceso
[pic 1]
2.-Proceso Productos
Escribir "Buen dia"
Escribir "Precio del primer producto"
Leer p1
Escribir "Nùmero de productos"
Leer np
res<- (p1 * np)
Escribir "Tù precio total es" res
Escribir "Precio del segundo producto"
Leer p2
Escribir "Nùmero de productos"
Leer np2
res2<- (p2 * np2)
Escribir "Tù precio total es" res2
Escribir "Precio del tercer producto"
Leer p3
Escribir "Nùmero de productos"
Leer np3
res3<- (p3 * np3)
Escribir "Tù precio total es" res3
Escribir "Precio del cuarto producto"
Leer p4
Escribir "Nùmero de productos"
Leer np4
res4<- (p4 * np4)
Escribir "Tù precio total es" res4
Escribir "Precio del quinto producto"
Leer p5
Escribir "Nùmero de productos"
Leer np5
res5<- (p5 * np5)
Escribir "Tù precio total es" res5
Leer ip
rest<- (res+res2+res3+res4+res5)
Escribir "Tu compra total es " rest
Escribir "Pago con"
Leer pag
camb<- (pag-rest)
Escribir "Cambio " camb
Escribir "¡Gracias por tu compra!y
FinProceso
[pic 2]
3.-
Proceso Kilometraje
Escribir "Kilometros a recorrer"
Leer kr
pag<-kr*5.5
Escribir "Total a pagar $" pag
FinProceso
[pic 3]
4.-
Proceso viajeDescuento
Escribir "Kilometros a recorrer"
Leer kr
pag<-kr*5.5
Escribir "Total a pagar $" pag
Si kr>5 Entonces
pt<-pag-(pag*0.2)
Escribir "Total con descuento $" pt
Sino
Escribir "Total sin descuento $" pag
Fin Si
FinProceso
[pic 4]
5.-
Proceso ciber
Escribir "Ingresa nùmero de horas"
Leer hrs
Escribir "Ingresa precio por hora"
Leer ph
ht1<-hrs*ph
Si hrs>3 Entonces
ht<-(ph*hrs)
Escribir "Cobrar$ " ht " Tienes 1hr gratis! "
Sino
Escribir "Cobrar$" ht1
Fin Si
FinProceso
[pic 5]
6.-
Proceso conversion
Escribir "Ingrese la cantidad en pesos"
Leer pesos
dolar<-19.89
vdolar<- dolar*pesos
Escribir "Usted tiene " vdolar "dolares"
Escribir "Ingrese la cantidad en pesos $"
Leer pesos2
euro<- 19.98
veuro<- euro*pesos2
Escribir "Usted tiene " veuro " en euros"
FinProceso
[pic 6]
7.-
Proceso aumento
Escribir "Ingresa años trabajados"
Leer at
sb<- 2500
Si at> 10 Entonces
au<- sb+(sb*0.5)
Escribir "Tu sueldo por aniversario es $" au
Sino
au2<-sb+(sb*0.3)
Escribir "Tu sueldo por aniversario es $" au2
Fin Si
FinProceso
[pic 7]
8.-
Proceso raizcalcular
Escribir "Ingresa un numero"
Leer n1
Si n1>0 Entonces
ra<-rc(n1)
Escribir "Tu resultado es " ra
Sino
Escribir "No hay raiz para tu numero"
Fin Si
Fin Proceso
[pic 8]
9.-
Proceso incrementocubo
Escribir "Ingresa el nùmero"
Leer num1
Si num1>0 Entonces
inc<- 3^(num1)
Escribir "Tu numero se incremento al cubo =" inc
Sino
Escribir "No aplica para el incremento al cubo"
Fin Si
[pic 9]
10.-
Proceso perimetroarea
Escribir "Calcular area y perimetro de una figura geometrica"
Escribir "1.- Circulo"
Escribir "2.- Triangulo"
Escribir "3.- Cuadrado"
Escribir "4.- Pentagono"
Leer fselec
Segun fselec Hacer
1:
Escribir "Seleccionaste Opcion 1.- Calcular àrea y perimetro del circulo"
Escribir "Ingresa el radio"
Leer rad
perimetro= 2*pi*rad
area=pi*radr
Escribir "perimetro del circulo=" perimetro
Escribir "Area del circulo=" area
2:
Escribir "Seleccionaste Opcion 2.- Calcular àrea y perimetro del triangulo"
Escribir "Ingresa la base"
Leer base
Escribir "Ingresa la altura"
Leer altura
perimetro= base+altura+altura
area= base*altura/2
Escribir "Preimetro del triangulo=" perimetro
...