Alan Alonso

Proceso Pizzeria Definir tipo, ingredientes, p como entero Definir precio, sub, iva, total como real Definir cliente como cadena EscribirSinSaltar "Ingrese el nombre del cliente: "; Leer cliente; Escribir "Ingresar el tipo de tamaño de piza: "; Escribir "1: Grande"; Escribir "2: Familiar"; Escribir "3: Jumbo"; EscribirSinSaltar "Rpta: "; Leer tipo; segun tipo hacer caso 1: precio<-100; caso 2: precio<-125; caso 3: precio<-150; finsegun EscribirSinSaltar "Ingrese la cantidad de ingredientes: "; Leer...

Proceso Anonimo2023 Definir i, j como entero Definir ingreso, promedio, suma como real Definir nombre, mes como cadena Dimension ingreso[5,12]; Dimension suma[5]; Dimension promedio[5]; Dimension nombre[5]; Para i<- 0 hasta 4 hacer suma[i]<-0; Finpara Para i<-0 hasta 4 hacer EscribirSinSaltar "Ingrese el nombre del almacen ",(i+1),": "; Leer nombre[i]; Finpara Para i <- 0 hasta 4 hacer Para j <- 0 hasta 11 hacer Segun j hacer caso 0: mes<-"Enero"; caso 1: mes<-"Febrero"; caso 2: mes<-"Marzo"; caso...

Proceso compra Definir i, n, suma, igv, total como real suma <-0; Para i<- 1 hasta 3 hacer Repetir EscribirSinSaltar "Ingrese el precio del producto ",i,": "; Leer n; Hasta que n > 0 suma<-suma+n; Finpara igv <- suma * 0.18; total <- suma + igv; Escribir "El gasto total de maria es ",Trunc( total * 100) / 100; Finproceso

Proceso Anonimo2023 Definir n1, n2, total como entero Definir Pman, Pmel como real EscribirSinSaltar "Ingrese la cantidad de manzanas: "; Leer n1; EscribirSinSaltar "Ingrese la cantidad de melones: "; Leer n2; total<-n1+n2; Pman<- (n1/total)*100; Pmel <-(n2/total)*100; Escribir "Porcentaje de manzanas: ",Trunc(Pman*100)/100," %"; Escribir "Porcentaje de melones: ",Trunc(Pmel*100)/100," %"; Finproceso

Proceso Paquetes Definir n, costo como real Definir zona como entero EscribirSinSaltar "Ingrese el peso del paquete: "; Leer n; Escribir "Ingrese el número de zona hacia donde lo quiere llevar: "; Escribir "1. America norte"; Escribir "2. America central"; Escribir "3. America sur"; Escribir "4. Europa"; Escribir "5. Asia"; Repetir EscribirSinSaltar "Rpta: "; Leer zona; Hasta que zona >0 y zona < 6 Segun zona hacer Caso 1: costo <- 11 * n; Caso 2: costo <- 10 * n; Caso 3: costo <- 12 * n; Caso 4:...

Proceso nota👨‍🎓 Definir i, n, suma, cont como entero Definir prom como real suma<-0; cont<-0; Dimension n[100]; Para i <- 0 hasta 99 hacer Repetir Escribir "Ingrese la nota del ",i+1,"° alumno: "; Leer n[i]; Hasta que n[i] > 0 y n[i] < 21 suma <- suma + n[i]; Finpara prom <- suma/100; Para i<- 0 hasta 99 hacer Si n[i] > prom entonces cont <- cont +1; Finsi Finpara Escribir "El promedio de los 100 alumnos es ",prom; Escribir "Cantidad de alumnos con nota mayor al promedio: ",cont; Finproceso

Proceso paginas📃😡 Definir pag como entero Definir pago como real EscribirSinSaltar "Ingrese el número de paginas: "; Leer pag; Si pag > 0 y pag < 5 entonces pago <- pag * 500; Sino Si pag > 4 y pag < 11 entonces pago <- pag * 800; Sino Si pag > 10 y pag < 21 entonces pago <- pag * 1500; Sino pago <- pag * 2000; Finsi Finsi Finsi Escribir "El pago total: $",pago; Finproceso

👍