Introducción a PSeInt
Clase 04
Material Clase
- PSeInt: https://pseint.sourceforge.net
Tipos de Datos
Dato | Descripción |
---|---|
Entero |
para números enteros |
Real |
para números decimales |
Cadena |
para texto |
Ejemplo: definir las variables A
, B
, C
, como entero, decimal y cadena de texto respectivamente
Proceso Ejemplo;
Definir A Como Entero;
Definir B Como Real;
Definir C Como Cadena FinProceso
Lectura y Escritura de datos
Función | Descripción |
---|---|
Leer |
lee el valor de la variable |
Escribir |
escribe una cadena de texto, el valor de una variable, o ambas |
Ejemplo 1: Mostrar en pantalla el mensaje hola mundo
Proceso Ejemplo1
Escribir "hola mundo"; FinProceso
Ejemplo 2: Solicitar al usuario ingresar su nombre, apellido y edad. Luego mostrarlos en pantalla.
Proceso Ejemplo2;
Definir nombre Como Cadena;
Definir apellido Como Cadena;
Definir edad Como Entero
"Ingrese su Nombre";
Escribir ;
Leer nombre"Ingrese su Apellido";
Escribir ;
Leer apellido"Ingrese su edad";
Escribir ;
Leer edad"Su nombre y apellido es: ", nombre, " ", apellido;
Escribir "Su edad es: ", edad;
Escribir FinProceso
Bucles
While
Mientras (expresión_logica) Hacer
...
...
... Fin Mientras
Ejemplo: Calcular la suma de los 100 primeros números.
Proceso Ejemplo;
Definir sum Como Entero;
Definir num Como Entero= 0;
sum = 1;
num
Mientras (num <= 100) Hacer
= sum + num;
sum = num + 1;
num
FinMientras
"La suma de los 100 primero número es :", sum;
Escribir FinProceso
Do-While
Repetir
...
...
... Hasta Que (expresión_logica)
Ejemplo: Ejecutar un programa hasta que el usuario ingrese el comando “terminar”.
Proceso Ejemplo;
Definir comando Como Cadena
Repetir"Ingrese el comando para salir del programa";
Escribir ;
Leer comandoQue (comando = 'terminar')
Hasta FinProceso
For
Para (i = valor_iniciar) Hasta (n) Con Paso (valor_paso) Hacer
...
...
... Fin Para
Ejemplo: Calcular la suma de los primeros 10 números.
Proceso Ejemplo;
Definir num Como Entero;
Definir sum Como Entero= 0;
sum
= 1 Hasta 10 Con Paso 1 Hacer
Para num = sum + num;
sum
FinPara
"La suma de los 10 primeros números es: ", sum;
Escribir FinProceso
Decisiones
If-else
Si (condición) Entonces
...
...
...
SiNo
...
...
... FinSi
Ejemplo: Realizar un programa que verifique si es mayor o menor de edad.
Proceso Ejemplo;
Definir edad Como Entero
"Ingrese su edad";
Escribir ;
Leer edad> 18 Entonces
Si edad "Ud. es mayor de edad";
Escribir
SiNo"Ud. es menor de edad";
Escribir
FinSi FinProceso
If anidados
Si (condición) Entonces
...
...
...
SiNo
Si (condición) Entonces
...
...
...
SiNo
...
...
...
FinSi FinSi
Funciones
Funciones con retorno
Funcion variable_retorno <- nombre_funcion (argumentos)
...
...
... Fin Funcion
Ejemplo: Diseñar un programa que calcule la suma de 3 números.
<- sumarNum (a, b, c)
Funcion suma ;
Definir suma Como Real= a + b + c;
suma
FinFuncion
Proceso Ejemplo;
Definir num Como Real3];
Dimension num[
"Ingrese el primer número";
Escribir 0];
Leer num["Ingrese el segundo número";
Escribir 1];
Leer num["Ingrese el tercer número";
Escribir 2];
Leer num[
"la suma de los 3 números es: ", sumarNum(num[0],num[1],num[2]);
Escribir FinProceso
Funciones sin retorno
Funcion nombre_funcion
...
...
... Fin Funcion
Ejemplo: Crear un programa que salude al ingresar 1
y se despida al ingresar 0
.
Funcion saludar"Hola!!, bienvenido";
Escribir
FinFuncion
Funcion despedir"Hasta Luego!!, vuelva otra vez";
Escribir
FinFuncion
Funcion error"ERROR!!, el comando ingresado es incorrecto";
Escribir
FinFuncion
Proceso Ejemplo;
Definir comando Como Entero
"Ingrese 1 para saludo, o 0 para despedida";
Escribir ;
Leer comando
= 1 Entonces
Si comando ;
saludar
SiNo= 0 Entonces
Si comando ;
despedir
SiNo;
error
FinSi
FinSi FinProceso
Ejercicios
Ejercicio 01
Sumar 3 números que se ingresan por teclado y mostrar el resultado.
ej01.psc
<- suma (a, b ,c)
Funcion sum ;
Definir sum Como Real= a + b + c;
sum
FinFuncion
Proceso Ejercicio01;
Definir num Como Real3];
Dimension num[
"Ingresar el primer número";
Escribir 0];
Leer num["Ingresar el segundo número";
Escribir 1];
Leer num["Ingresar el tercer número";
Escribir 2];
Leer num["La suma de los 3 números es: " , suma(num[0], num[1], num[2]);
Escribir FinProceso
Ejercicio 02
Calcular el área de un triángulo.
ej02.psc
<- areaTriangulo (b, h)
Funcion area ;
Definir area Como Real= b * h / 2;
area
Fin Funcion
Proceso Ejercicio02;
Definir altura Como Real;
Definir base Como Real
"Ingrese la altura del triángulo";
Escribir ;
Leer altura"Ingrese la base del triángulo";
Escribir ;
Leer base"El área del triángulo es: ", areaTriangulo(base, altura);
Escribir FinProceso
Ejercicio 03
Promediar 3 números ingresados.
ej03.psc
<- promedio (a, b ,c)
Funcion prom ;
Definir prom Como Real= (a + b + c) / 3;
prom
FinFuncion
Proceso Ejercicio03;
Definir num Como Real3];
Dimension num[
"Ingresar el primer número";
Escribir 0];
Leer num["Ingresar el segundo número";
Escribir 1];
Leer num["Ingresar el tercer número";
Escribir 2];
Leer num["El promedio de los 3 números es: " , promedio(num[0], num[1], num[2]);
Escribir FinProceso
Ejercicio 04
Determinar que APRUEBA si ‘nota’ es mayor a 4.0 o REPRUEBA si es menor a 4.0.
ej04.psc
Proceso Ejercicio04;
Definir nota Como Real"Ingrese nota";
Escribir ;
Leer nota>= 4.0 Entonces
Si nota "APRUEBA";
Escribir
SiNo"REPRUEBA";
Escribir
FinSi FinProceso
Ejercicio 05
Indicar “DEBE ASISTIR A PROGRAMACIÓN” si el día es igual a “JUEVES”, de lo contrario “DEBE ASISTIR A OTRAS CLASES”.
ej05.psc
Proceso Ejercicio05;
Definir dia Como Cadena"Ingrese el día";
Escribir ;
Leer dia= "jueves" O dia = "JUEVES" Entonces
Si dia "DEBE ASISTIR A PROGRAMACIÓN";
Escribir
SiNo"DEBE ASISTIR A OTRAS CLASES";
Escribir
FinSi FinProceso
Ejercicio 06
Indicar si un número es PAR o IMPAR.
ej06.psc
Proceso Ejercicio06;
Definir num Como Entero"Ingrese un número entero";
Escribir ;
Leer num2 = 0 Entonces
Si num mod "El número es par";
Escribir
SiNo"El número es impar";
Escribir
FinSi FinProceso