PSeInt: Ejemplos básicos
resueltos
1) Escribir en PSeInt un programita que muestre el siguiente texto: “¡Hola
mundo!”.
Algoritmo hola_mundo
Escribir "Hola mundo"
FinAlgoritmo
2) Escribir un programa que a partir de un número ingresado diga si es mayor,
menor o igual a 9.
Algoritmo MayoresIgualesMenoresA9
N<-0
Escribir "Escribir el numero"
Leer N
Si N Es Igual A 9 Entonces
Escribir "El numero es igual a 9"
Sino
Si N Es Mayor Que 9 Entonces
Escribir "El numero es mayor a 9"
Sino
Escribir "El numero es menor a 9"
Fin Si
Fin Si
FinAlgoritmo
3) Crear un programa que a partir de un número ingresado diga si el mismo es
par o impar.
Algoritmo ParidadNumeros
Leer nro
Si (nro mod 2) = 0 entonces
Escribir "es par"
Sino
Escribir "es impar"
Fin Si
FinAlgoritmo
4) Realizar un programa que permita ingresar dos números y devuelva el
resultado de la suma entre ambos.
Algoritmo SumaDosNumeros
Algoritmo sumadedosnumeros
Num1<-0
Num2<-0
Escribir "Escribir el numero 1"
Leer Num1
Escribir "Escribir el numero 2"
Leer Num2
Rta<-Num1+Num2
Escribir "El resultado es:" Rta
FinAlgoritmo
5) Escribir un programa que sume todos los números pares entre 2 y 100.
Algoritmo SumaDePares
suma <- 0
nro <- 2
Mientras nro<=100 hacer
si nro mod 2 = 0 Entonces
suma= suma+nro
FinSi
nro=nro+1
FinMientras
Escribir "la suma de los pares entre 2 y 100 es "
suma
FinAlgoritmo
6) Escribir un programa que permita ingresar un número y muestre en pantalla
todos los divisores del mismo.
Algoritmo divisores_de_numero
Escribir "Ingrese Numero"
Leer Num
div<-1
Mientras Div<=Num Hacer
Si Num MOD div = 0
Escribir div
Fin Si
div<-div+1
Fin Mientras
FinAlgoritmo
7) Determinar si un alumno aprueba o reprueba un curso, sabiendo que
aprobará si su promedio de tres calificaciones es mayor o igual a 4.0; reprueba
en caso contrario. Deberá permitir ingresar las tres calificaciones y luego
calcular su promedio.
Algoritmo aprueba_reprueba
Escribir "Ingrese calificacion 1"
Leer Cal1
Escribir "Ingrese calificacion 2"
Leer Cal2
Escribir "Ingrese calificacion 3"
Leer Cal3
Prom<-(Cal1+Cal2+Cal3)/3
Si Prom>=4 Entonces
Escribir "Aprueba"
Sino
Escribir "Reprueba"
Fin Si
Escribir Prom
FinAlgoritmo
8) Crear un programa que permita ingresar un nombre y una cantidad numérica
para que así después el programa escriba este nombre tantas veces como su
cantidad ingresada. Utilizar la función MIENTRAS.
Algoritmo Cantidad_nombre
Escribir "Ingresar Nombre"
Leer nombre
Escribir "Ingresar Cantidad"
Leer num
Mientras Num>0 Hacer
Escribir nombre
Num<-Num - 1
Fin Mientras
FinAlgoritmo
9) Escribir un programa que permita sumar todos los números naturales
comprendidos entre 1 y 50 utilizando la función REPETIR.
Algoritmo suma_numerosnaturales_1y50
Num<-1
Resul<-0
Repetir
Resul<-Resul+Num
Num<-Num+1
Hasta Que Num>50
Escribir Resul
Fin algoritmo
10) Diseñar un algoritmo que pida por teclado tres números; si el primero es
negativo, debe imprimir la multiplicación de los tres y si no lo es, imprimirá la
suma.
Algoritmo tresnumeros
Escribir "Ingrese numero 1"
Leer Num1
Escribir "Ingrese numero 2"
Leer Num2
Escribir "Ingrese numero 3"
Leer Num3
Si Num1<0 Entonces
Resul<-Num1 * Num2 * Num3
Sino
Resul<-Num1+Num2+Num3
Fin Si
Escribir Resul
FinAlgoritmo
11) Definir un programa que determine si un número ingresado es primo o no.
(Un número es primo si es divisible únicamente por 1 y por sí mismo).
Algoritmo NumerosPrimos
Escribir "Ingrese un número: "
Leer nro
div <- 2
band <- Verdadero
Si nro=1 Entonces
Escribir "Es primo"
Sino
Mientras band=Verdadero y nro>div Hacer
Si nro MOD div = 0 Entonces
band <- Falso
FinSi
div <- div +1
FinMientras
si band= Verdadero Entonces
Escribir "Es primo"
Sino
Escribir "No es primo"
FinSi
FinSi
FinAlgoritmo
12) Crear un programa que efectúe la suma de los dígitos de un número
ingresado. Ejemplo: Si se ingresa 123, debería devolver 6.
Algoritmo SumaDigitos
Escribir "Ingrese un nro: "
Leer nro
resul <- 0
Mientras nro <> 0 Hacer
resul <- resul + nro MOD 10
nro <- trunc(nro/10)
FinMientras
Escribir "El resultado es: " resul
FinAlgoritmo