// Implemente en Pseint los algoritmos en pseudocódigo que resuelvan los siguientes problemas.
// -Problema1: Implementar un formulario que pida el nombre después el apellido, luego el rut y finalmente la dirección. Para que muestre por pantalla la siguiente información con los datos ingresados.
// +Nombre:
// +Apellido:
// +Rut:
// +Dirección:
Proceso Problema_1
Definir Nombre, Apellido, Rut,Direccion como caracter;
Escribir "Escriba Su nombre";
Leer Nombre;
Escribir "Escriba Su Apellido";
Leer Apellido;
Escribir "Escriba Su rut";
Leer Rut;
Escribir "Escriba Su dirección";
Leer Direccion;
Escribir "Nombre completo: ", Nombre, " ", Apellido;
Escribir "Número de rut: ", rut;
Escribir "Dirección: ", Direccion;
FinProceso
// Problema2: Mostrar por pantalla los números pares entre [0,100].
Proceso Problema_2
definir i como entero;
i <- 0;
mientras i <= 100 Hacer
Escribir i;
i <- i + 2;
FinMientras
FinProceso
// Suponga que un individuo desea invertir su capital en un banco y desea saber cuanto dinero ganara después de un mes si el banco paga a razón de 2% mensual.
Proceso Problemas_secuenciales_1
Definir cap_inv como entero;
Definir gan como real;
Escribir "Ingresa la cantidad total de tu capital";
Leer cap_inv;
gan <- cap_inv * 0.2;
Escribir "En un mes sus ganancias serán un total de: ", gan, " pesos";
FinProceso
// Un vendedor recibe un sueldo base mas un 10% extra por comisión de sus ventas, el vendedor desea saber
// cuanto dinero obtendrá por concepto de comisiones por las tres ventas que realiza en el mes y el total
// que recibirá en el mes tomando en cuenta su sueldo base y comisiones.
Proceso Problemas_secuenciales_2
Definir SalarioB, v1, v2, v3, TVenta como entero;
definir comision,tpag como real;
Escribir "Digita tu sueldo ";
Leer SalarioB;
Escribir "Digita el valor de cada venta ";
leer v1, v2, v3;
TVenta <- v1 + v2 + v3;
comision <- TVenta * 0.10;
tpag <- SalarioB + comision;
Escribir "La comisión que obtrendrás este mes es de: ", comision," "," Y el total a pagar es de: ", tpag;
FinProceso
//Una tienda ofrece un descuento del 15% sobre el total de la compra y un cliente desea saber cuanto deberá pagar finalmente por su compra.
Proceso Problemas_secuenciales_3
Definir Total_cuenta como entero;
Definir d, total_Pago como real;
Escribir "Digite el valor de la compra";
Leer Total_cuenta;
d <- Total_cuenta*0.15;
total_Pago <- Total_cuenta - d;
Escribir "EL valor total a pagar es: ", total_Pago;
FinProceso
// Un maestro desea saber que porcentaje de hombres y que porcentaje de mujeres hay en un grupo de estudiantes.
Proceso Problemas_secuenciales_4
Definir Nh, Nm, Total como entero;
Definir Porcentaje_H, Porcentaje_M como real;
Escribir "Digite primero el número de hombres, luego el de mujeres";
Leer Nh, Nm;
Total <- Nh + Nm;
Porcentaje_H <- (Nh/Total) *100;
Porcentaje_M <- (Nm/Total) *100;
Escribir "El porcentaje de hombres es: ", Porcentaje_H;
Escribir "Y el porcentaje de mujeres es: ", Porcentaje_M;
FinProceso
//Un alumno desea saber cual será su calificación final en la materia de Algoritmos. Dicha calificación se compone de los siguientes porcentajes:
// 55% del promedio de sus tres calificaciones parciales.
// 30% de la calificación del examen final.
//15% de la calificación de un trabajo final.
Proceso Problemas_secuenciales_5
Definir c1,c2,c3,ef,tf,prom,ppar,pef,ptf,cf como real;
Escribir"Digita las tres calificaciones parciales";
Leer c1,c2,c3;
Escribir "Digita la calificación del examen final";
Leer ef;
Escribir "Digita la calificación del trabajo final";
leer tf;
prom <- (c1 + c2 + c3)/3;
ppar <- prom * 0.55;
pef <- ef * 0.30;
ptf <- tf * 0.15;
cf <- ppar + pef + ptf;
Escribir "La calificación final es: ", cf;
FinProceso
Repetir y ciclo para:
// Hacer un algoritmo para un sistema de seguridad con la contraseña: 1234, el usuario se puede equivocar tres veces a la cuarta se bloquea el sistemas (Repetir)
Algoritmo contraseña3intentos
definir x Como Entero
definir contraseña Como Caracter
x=1
Repetir
Escribir ' Digite su contraseña '
leer contraseña
si contraseña = '1234'
escribir ' felcidades has entrado'
SiNo
escribir ' contraseña incorrecta'
si x== 3 Entonces
escribir ' Has fallado 3 intentos'
FinSi
x= x + 1
FinSi
Hasta Que x = 4
FinAlgoritmo
//Hacer una calculadora básica(suma, resta, multiplicación, división) usando según y repetir hasta (Repetir)
Algoritmo Calculadora
Definir a,b,resultado como real
Definir opc Como Caracter
Repetir
Escribir ""
Escribir "1 = Suma"
Escribir "2 = Resta"
Escribir "3 = Multiplicacion"
Escribir "4 = Division"
Escribir "Elige una opcion"
leer opc
Escribir "Escribe un numero"
leer a
Escribir "Escribe un numero"
leer b
Segun opc Hacer
"1":
resultado = a+b
Escribir "La suma de ",a," + ",b," = ",resultado
"2":
resultado = a-b
Escribir "La resta de ",a," - ",b," = ",resultado
"3":
resultado = a*b
Escribir "La multiplicacion de ",a," x ",b," = ",resultado
"4":
resultado = a/b
Escribir "La division de ",a," / ",b," = ",resultado
De Otro Modo:
Escribir "Sistema finalizado"
FinSegun
Escribir "Digite N Para salir o S si desea continuar";
leer opc
Hasta Que opc = "N" o opc = "n"
FinAlgoritmo
//Un programador tiene un salario inicial de $1500, y recibe un incremento de 10 % anual durante N años.
//¿Cuál es su salario al cabo de N años?
//¿Qué salario ha recibido en cada uno de los N años?
Algoritmo programador
Definir salario Como Real
Definir x Como Entero
salario = 1500
para x = 1 Hasta 6 Con Paso 1 Hacer
salario = salario + (salario * 0.10)
Escribir "El salario en el año ",x," es: $",salario
FinPara
Escribir "El salario en 6 a años es: $",salario
FinAlgoritmo
//Hacer un algoritmo que lea 5 números y determine la suma entre ellos.
Algoritmo ejercicio_3
Definir n,j,i como entero;
i <- 0
Para i<-1 hasta 5 con paso 1 hacer
Escribir "Digita un número";
Leer n;
j <- n + j;
Escribir n;
FinPara
Escribir "La suma total entre los números digitados es: ",j;
FinAlgoritmo
//Algoritmo que permita obtener el promedio de la cantidad de números que el usuario desee digitar, preguntando además si desea continuar o no.
Algoritmo Ejercicio_4
Definir n,i,j Como Entero;
Definir p Como Caracter;
Definir promedio Como Real;
Repetir
Escribir "Digite un número";
Leer n;
i <- n + i;
j <- j +1;
Escribir "¿Desea continuar?"
Escribir "Ingrese s para continuar o n para salir";
Leer p;
Hasta Que p ="N" O p="n"
promedio <- j/i;
Escribir "Cantidad de números ingresados ",j;
FinAlgoritmo
//Hacer un seudocódigo que imprima los números del 100 al 0, en orden decreciente.
Algoritmo Ejercicio_5
Definir n como entero;
n <- 100;
Para n <- 100 hasta 0 con paso -1 Hacer
Escribir n;
FinPara
FinAlgoritmo
//Realizar un algoritmo con ciclo para que lea el valor de N artículos y diga cuál es el precio del mayor.
Algoritmo Ejercicio_6
Definir n,i, numeromayor como entero;
Definir v como real;
Escribir "Ingrese el número de articulos a leer";
Leer n;
i <- 1;
Mientras i <= n hacer
Escribir "Ingresa el valor del primer articulo";
Leer v;
Si i = 1 Entonces
numeromayor = v
SiNo
Si v > numeromayor Entonces
numeromayor=v
FinSi
FinSi
i <- i + 1
FinMientras
Escribir "Numero mayor ",numeromayor;
FinAlgoritmo
// Crear un algoritmo que calcule la raíz cuadrada del número que introduzca el usuario. Si se introduce un número negativo, debe mostrar un mensaje de error y volver a pedirlo. (tantas veces como sea necesario).
Algoritmo ejercicio7
Definir n,i como real;
Escribir "Introduce un número";
Leer n;
Si n < 0 entonces
Repetir
Escribir "No se puede ejecutar la acción, digite un número positivo";
Escribir "introduce un número";
Leer n;
Hasta que n >= 0
Si n >= 0 Entonces
i = rc(n);
Escribir "La raiz cuadrada de ",n," es ", i;
FinSi
Sino
i = rc(n);
Escribir "La raiz cuadrada de ",n," es ", i;
FinSi
FinAlgoritmo
//Hacer un algoritmo que imprima los 51 primeros números impares
Algoritmo Ejercicio8
Definir n como entero;
n <- 1;
Para n <- 1 hasta 100 con paso 2 Hacer
Escribir n;
FinPara
FinAlgoritmo
Matrices:
//Hacer un algoritmo que permita ingresar dos vectores A y B de tamaño n realice la suma
//A+B elemento por elemento y muestre el resultado en pantalla
//A= 4,2,8 B=1,5,3 C=5,7,11
Algoritmo sin_titulo
definir a, b,c,n Como Entero;
Escribir "ingresa la cantidad de números que deseas sumar";
Leer n;
Dimension a[n];
Dimension b[n];
Para i <- 1 hasta n con paso 1 Hacer
Escribir "Ingresa un número ";
Leer a[i];
Escribir "Ingresa otro número";
Leer b[i];
c <- a[i] + b[i];
Escribir "La suma de ",a[i]," + ",b[i]," = ", c
FinPara
FinAlgoritmo
Algoritmo matriz_3x2
Escribir "ingrese cantidad de filas";
Leer m;
Escribir "Ingrese la misma cantidad columnas";
Leer n;
dimension mat(m,n)
para fila<-1 hasta m Hacer
para columna <-1 hasta m
imprimir"ingresar valor"
leer mat(m,n)
FinPara
FinPara
para fila<-1 hasta n Hacer
para columna <-1 hasta n
imprimir sin saltar mat(m,n),""
FinPara
imprimir " "
FinPara
para i <- 1 hasta m Hacer
Escribir mat(m,n);
FinPara
para i <- 1 hasta n Hacer
Escribir mat(m,n);
FinPara
FinAlgoritmo
Algoritmo salario
Definir n,may,suma Como Entero;
Definir prom como real;
Escribir "Cantidad de pesos: ";
Leer n;
may <- 0;
suma<- 0;
Dimension num[n];
para i<-1 hasta n hacer
imprimir "ingresar el peso: ",i
leer num[i]
suma= suma+num [i]
si (num[i]>may) entonces
may<-num [i]
FinSi
FinPara
prom=suma/n
imprimir "el promedio de los pesos es: ",prom
imprimir "el peso mayor es: ", may
FinAlgoritmo
//Calcular el promedio de 50 valores almacenados en un vector. Determinar además cuantos son mayores que el promedio, imprimir
//el promedio, el número de datos mayores que el promedio y una lista de valores mayores que el promedio.
Algoritmo ejercicio1
Definir i,n,suma,a como entero;
Definir promedioN como real;
Escribir "Digite la cantidad de números que desea ingresar";
leer n;
Dimension num[n];
Para i <- 1 hasta n con paso 1 hacer
Escribir "Digita un número";
Leer num[i];
FinPara
Para i <- 1 hasta n con paso 1 hacer
suma <- suma+num[i];
FinPara
promedioN <- suma / n;
Escribir "El promedio de los números ingresados es: ",promedioN;
Escribir " ";
Escribir "Los números mayores al promedio son:"
Para i <- 1 hasta n con paso 1 hacer
si num[i] > promedioN Entonces
a <- a+1;
Escribir num[i];
FinSi
FinPara
Escribir "Cantidad de números mayores al promedio: ", a;
Escribir " ";
FinAlgoritmo
//2. Llenar dos vectores A y B de 45 elementos cada uno, sumar el elemento uno del vector A con el elemento uno del vector B y así sucesivamente hasta 45,
// almacenar el resultado en un vector C, e imprimir el vector resultante.
Algoritmo ejercicio2
Definir a,b,c,n como enteros;
Escribir "Digita la cantidad de números que quieres sumar";
Leer n;
Dimension a[n]
Dimension b[n]
Dimension c[n]
Para i <- 1 hasta n con paso 1 Hacer
Escribir "Digita el número a"
Leer a[i];
Escribir "digita el número b";
Leer b[i];
c[i] <- a[i] + b[i]
FinPara
Para i <- 1 hasta n con paso 1 Hacer
Escribir "En la posición ", i;
Escribir "El resultado del número ", a[i]," + ",b[i], " = ", c[i];
FinPara
FinAlgoritmo
// 3. Almacenar 30 números en un vector, imprimir cuantos son ceros, cuantos son negativos, cuantos positivos. Imprimir además la suma de los negativos y la suma de los positivos.
Algoritmo ejercicio3
Definir num,n,i,ceros,negativos,positivos,sumanegativos,sumapositivos como entero;
Escribir "Digita la cantidad de números que deseas ingresar";
Leer n;
Dimension num[n];
Para i <- 1 hasta n con paso 1 Hacer
Escribir "Ingresa un número";
Leer num[i];
si num[i] = 0 Entonces
ceros <- ceros + 1
Sino
Si num[i] < 0 Entonces
negativos <- negativos + 1
sumanegativos <- sumanegativos + num[i];
Sino
Si num[i] > 0 Entonces
positivos <- positivos + 1
sumapositivos <- sumapositivos + num[i];
FinSi
FinSi
FinSi
FinPara
Escribir "Estos son la cantidad de ceros ingresados ", ceros;
Escribir "Estos son la cantidad de negativos ingresados ", negativos;
Escribir "Estos son la cantidad de positivos ingresados ", positivos;
Escribir "La suma de los negativos es: ", sumanegativos;
Escribir "La suma de los positivos es: ", sumapositivos;
FinAlgoritmo
//4. Crear un arreglo llamado nombres y que almacene los siguientes nombres de personas: Juan, Pedro, maría, Humberto y Oscar
Algoritmo ejercicio4
Definir n Como Entero;
Dimension nombres[5];
nombres[1] <- "Juan";
nombres[2] <- "Pedro";
nombres[3] <- "María";
nombres[4] <- "Humberto";
nombres[5] <- "Oscar";
Para i <- 1 hasta 5 con paso 1 hacer
Escribir nombres[i];
FinPara
FinAlgoritmo
// 5. Llenar un arreglo con nombres de personas. Preguntar al usuario cuantos datos desea ingresar.
Algoritmo ejercicio4
Definir n Como Entero;
Escribir "Digite la cantidad de nombres que desea ingresar";
Leer n;
Dimension nombres[n];
Para i <- 1 hasta n con paso 1 hacer
Escribir "Escriba un nombre";
Leer nombres[i];
FinPara
PAra i <- 1 hasta n con paso 1 Hacer
Escribir "El nombre en la posicion ",i," Es: ",nombres[i];
FinPara
FinAlgoritmo
Comentarios
Publicar un comentario