Autor
|
Tema: Juego de PPT con una función (Pseint) (Leído 3,463 veces)
|
Antoniio
Desconectado
Mensajes: 121
|
Hola, soy nuevo en esto y estoy comenzando con un programa básico y sencillo, el problema es que me trabé en un trabajo que me han dejado, vine a pedir ayuda para ver si alguien de aquí podría explicarme como hacerlo o terminarlo, el planteamiento es el siguiente:
**************************************** Considerar que hay un capital inicial y que con cada vez que se juega el capital puede cambiar.
Cuidar que no se pueda jugar si el capital es insuficiente.
Jugar hasta que el usuario indique lo contrario o hasta que se acabe el capital.
Bosquejo del programa esperado
escribir "¿quiere jugar?"
leer resp
escribir "¿cual es tu capital para jugar?"
leer capital
mientras resp=='s' hacer
escribir "¿cuánto apuestas?"
jugar_PPT(capital,apuesta)
escribir "¿quieres jugar otra vez?"
leer resp
fin-mientras
**************************************************
Se debe realizar en Pseint, gracias de antemano :3
|
|
|
En línea
|
|
|
|
fary
|
Aquí tienes la solución.
|
|
|
En línea
|
Un byte a la izquierda.
|
|
|
Antoniio
Desconectado
Mensajes: 121
|
Gracias, lo he hecho ya, me quedó así:
******************************************************
Proceso areas_r Repetir Escribir "Elige la opcion que deseas calcular" Escribir "1) Area de un Circulo" Escribir "2) Area de un Cuadrado" Escribir "3) Area de un Rectangulo" Escribir "4) Area de un Triangulo" leer op si op = 1 Entonces Escribir "Ingrese el radio del circulo" leer R ra <- R*R; area <- ra*3.1416; Escribir "El area del circulo es: ", area Sino si op = 2 Entonces Escribir "Ingrese el lado del cuadrado" leer la area <- la*la; Escribir "El area del cuadrado es: ", area Sino si op = 3 Entonces Escribir "Ingrese la base" leer b Escribir "Ingrese la altura" leer h ar<- b*h Escribir "El area del rectangulo es: ", ar Sino si op = 4 Entonces Escribir "Ingrese la base" leer base Escribir "Ingrese la altura" leer altura areaa <- base*altura/2 Escribir "El area del triangulo es: ", areaa Sino Escribir "Error" FinSi FinSi FinSi FinSi Escribir "Desea continuar? (si/no)" leer respuesta Hasta Que respuesta = "no" FinProceso
******************************************
Ahora, me dicen que debe hacerse con Subproceso y eso me ha dejado mas sacado de onda, alguna ayuda en eso??
|
|
|
En línea
|
|
|
|
fary
|
|
|
|
En línea
|
Un byte a la izquierda.
|
|
|
|
Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
Problema con Pseudocodigo. Pasar C++ a Pseint :S
Programación General
|
QuinteroSaavedra
|
7
|
47,571
|
10 Octubre 2015, 00:57 am
por mendoz12
|
|
|
Pseint, Ayuda :C
Programación General
|
Caroline.z3
|
1
|
6,065
|
18 Diciembre 2010, 03:43 am
por Littlehorse
|
|
|
cuadrante pseint
Programación General
|
winnipu
|
0
|
2,025
|
26 Noviembre 2012, 02:11 am
por winnipu
|
|
|
pequeña ayuda plz(pseint)
Programación General
|
Fire.Soul
|
0
|
2,456
|
17 Mayo 2013, 22:28 pm
por Fire.Soul
|
|
|
pseint
Programación General
|
marioteilor
|
1
|
2,447
|
25 Noviembre 2013, 15:30 pm
por Mad Antrax
|
|