prototipopiedra.psc

Funcion lanzamiento(computador Por Referencia)
	
    Dimension ordenador[3]
    ordenador[1] = "piedra"
    ordenador[2] = "papel"
    ordenador[3] = "tijera"
	
	ordenado=Aleatorio(1,3)
	
	computador= ordenador(ordenado)
	
FinFuncion

Algoritmo piedraPapelTijeras
    Definir ordenador, jugador1 Como Caracter

	Escribir "Ingresa tu jugada (piedra, papel o tijera):"
	Leer jugador

	si jugador="piedra" o jugador= "papel" O jugador=  "tijera" Entonces
		
		lanzamiento(jugadorOrdenador)

	Escribir "el ordenador lanzo ", jugadorOrdenador

	si jugadorOrdenador=jugador Entonces
		Escribir "empate"

	FinSi
	si jugadorOrdenador = "papel" y jugador="piedra" o  jugador = "papel" y jugadorOrdenador="piedra" 
		si jugadorOrdenador <> "papel"
			Escribir " ganaste Buen juego"
		SiNo
			Escribir " Perdiste! Gano Ordenador "
		FinSi
	FinSi
	
	si jugadorOrdenador = "tijera" y jugador="papel" O  jugador = "tijera" y jugadorOrdenador="papel" 
		si jugadorOrdenador <> "tijera" 
			Escribir " ganaste Buen juego"
		SiNo
			Escribir " Perdiste! Gano Ordenador "
		FinSi
		
	FinSi
	
	si jugadorOrdenador = "piedra" y jugador="tijera" O  jugador = "piedra" y jugadorOrdenador="tijera" 
		si jugadorOrdenador <> "piedra"
			Escribir " ganaste Buen juego"
		SiNo
			Escribir " Perdiste! Gano Ordenador "
		FinSi
	FinSi
	
	
SiNo
	Escribir "error recuerda que debes ingresar piedra,pepel o tijera"
FinSi
FinAlgoritmo