1. Programa que funciona como cajero automático.

El primer programa que les presento es un seudocódigo hecho en PSeInt el cual funciona como cajero automático. Permitiendo al usuario ingresar:

- su numero de cuenta y contraseña

-método de pago entre tarjeta o efectivo

- tipo de tarjeta entre debito y crédito

Asi mismo, permite conocer el saldo existente en la cuenta, retirar la cantidad de dinero ingresado y realizar depósitos. Al final del proceso, puede generar un comprobante.

Pseudocódigo:

Proceso Banco

Definir numcuenta Como Caracter

Definir contrasena Como Caracter

Definir intentos Como Entero

Repetir

Escribir "Ingrese su numero de cuenta:"

Leer numcuenta

Escribir "Ingrese su contraseña:"

Leer contrasena

intentos = intentos + 1

Si numcuenta == "021605" Y contrasena == "mmm616" Entonces

Escribir "Bienvenido"

Escribir "Ingrese el metodo que utilizara."

Escribir "1.Tarjeta"

Escribir "2.Efectivo"

Leer metodo

Segun metodo Hacer

"1":

Escribir "Metodo Ingresado. Puede proseguir."

"2":

Escribir "Metodo Ingresado. Puede proseguir."

De Otro Modo:

Escribir "Escoja una opcion valida."

FinSegun

Segun metodo Hacer

"1":

Escribir "Ingrese su tipo de tarjeta."

Escribir "a. Credito"

Escribir "b. Debito"

Leer tipotarg

Segun tipotarg Hacer

"a": Escribir "Ingrese su numero de tarjeta de credito."

Leer numtarg

si numtarg=="9876" Entonces

Escribir "Numero de tarjeta correcto."

SiNo

Escribir "Numero de tarjeta incorrecto."

FinSi

"b": Escribir "Ingrese su numero de tarjeta de debito."

Leer numtarg

si numtarg=="9876" Entonces

Escribir "Numero de tarjeta correcto."

SiNo

Escribir "Numero de tarjeta incorrecto."

FinSi

De Otro Modo:

Escribir "Ingrese un numero de tarjeta valido."

FinSegun

"2":

Escribir "Ingrese el monto en efectivo."

Leer montoefectiv

FinSegun

Escribir "Ingrese la opción deseada:"

Escribir "3. Consultar saldo"

Escribir "4. Realizar depósito"

Escribir "5. Realizar retiro"

Leer opcion

Segun opcion Hacer

3: Escribir "Su saldo actual es: $", saldo

4: Escribir "Ingrese la cantidad a depositar:"

Leer cantidad

saldo <- saldo + cantidad

Escribir "Depósito realizado con éxito. Su saldo actual es: $", saldo

Escribir "¿Desea continuar?"

Escribir "C. Si "

Escribir "D. No"

Leer opcion2

Segun opcion2 hacer

"C" o "c": escribir "Ingrese la cantidad a depositar:"

Leer cantidad1

saldo<- saldo + cantidad1

"D" o "d": escribir "Gracias por realizar su transferencia."

De Otro Modo:

Escribir "Error."

FinSegun

5: Escribir "Ingrese la cantidad a retirar:"

Leer cantidad

Si cantidad > saldo Entonces

Escribir "Fondos insuficientes"

SiNo

saldo <- saldo - cantidad

Escribir "Retiro realizado con éxito. Su saldo actual es: $", saldo

FinSi

De Otro Modo:

Escribir "Ingrese un numero dentro del rango de opciones"

FinSegun

Escribir "¿Desea generar un comprobante?"

Escribir "E. Si"

Escribir "F. No"

Leer opcion1

Segun opcion1 Hacer

"E":

Escribir "Su comprobante es el siguiente: "

Escribir "Metodo de pago utilizado: ",metodo

si metodo=="2" Entonces

Escribir "Efectivo."

FinSi

Escribir "Numero de cuenta: ",numcuenta

Escribir "Numero de tarjeta: ",numtarg

Escribir "El deposito realizado fue de: ",saldo

Escribir "La cantidad retirada fue de: ",cantidad

Escribir "Su saldo actual es de: ",saldo

Escribir "** "

Escribir " Gracias por su visita."

Escribir " **"

"F":

Escribir "Gracias por su visita."

FinSegun

SiNo

Escribir "Usuario o contraseña incorrectos"

FinSi

si intentos==3 Entonces

Escribir "Ha excedido el número de intentos permitidos"

Escribir "Porfavor reinicie el proceso."

FinSi

Hasta Que intentos==3

FinProceso

Ejecuciones:

2.- Programa que realiza conversiones de temperaturas en la escala termométrica y realiza conversiones de calor.

El segundo programa nos permite realizar las conversiones de temperaturas en la escala termométrica (Celsius, Kelvin, Fahrenheit y Rankine). Además de eso, también es posible hacer conversiones de calor (Calor latente, calor especifico, calor sensible, calor de fusión y calor de vaporización) ingresando los datos que pide el programa.

Pseudocódigo:

Algoritmo conversiontemperaturas

//Conversion de temperaturas y calculos de calor.

//Elaborado por Tahiny Mel Chavarria Cuenca

Escribir "--------------------------------------------------------------"

Escribir "----- Conversion de temperaturas (Escalas termometricas) -----"

Escribir "--------------------------------------------------------------"

Escribir "1. Celsius a Kelvin."

Escribir "2. Kelvin a Celsius."

Escribir "3. Celsius a Fahrenheit"

Escribir "4. Fahrenheit a Celsius"

Escribir "5. Fahrenheit a Kelvin"

Escribir "6. Kelvin a Fahrenheit."

Escribir "7. Kelvin a Rankine."

Escribir "--------------------------------------------------------------"

Escribir "------- Conversiones en Termodinamica: Calor -----------------"

Escribir "--------------------------------------------------------------"

Escribir "8. Calcular el calor latente de un cuerpo."

Escribir "9. Calcular el calor especifico."

Escribir "10. Calcular el calor sensible y el calor de fusion."

Escribir "11. Calcular el calor de vaporizacion."

Escribir "Escoja una opcion."

Leer opt

Segun opt

Escribir "Celsius a Kelvin."