Algoritmo Comando_Para_Simulador_de_Partido_J //Programa que simula un partido, con eventos reales, hasta los 90 minutos Definir equipo1, equipo2, simularPrimerTiempo, simularSegundoTiempo Como Cadena //Escribir equipos que juegan Escribir "Hola, bienvenido a nuestro simulador de partidos" Escribir "Escribe el primer equipo" Leer equipo1 Escribir "Escribe el segundo equipo" Leer equipo2 Mostrar partido a simular Escribir "" Escribir "El partido a simular es: " Escribir "---------------------------------" Escribir equipo1, " VS ", equipo2 Escribir "---------------------------------" Repetir Escribir "Da enter, para empezar la simulacion" Leer simularPrimerTiempo; Hasta Que simularPrimerTiempo == "" Escribir "" Escribir "" //Empezar Simulacion Primer Tiempo Definir minutoAleatorio, golesEquipo1, golesEquipo2 Como Entero golesEquipo1 = 0 golesEquipo2 = 0 Para i=1 Hasta 45 Con Paso 1 Hacer minutoAleatorio = Aleatorio(1,45) Segun Aleatorio(1,45) Hacer minutoAleatorio: Escribir "En el minuto ", i, " hay una falta de un jugador del ", equipo2 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay una falta de un jugador del ", equipo1 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay un fuera de juego del ", equipo1 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay un fuera de juego del ", equipo2 Escribir "" minutoAleatorio: golesEquipo2 = golesEquipo2 + 1 Escribir "En el minuto ", i, " el ", equipo2, " mete gol" Escribir "" minutoAleatorio: golesEquipo1 = golesEquipo1 + 1 Escribir "En el minuto ", i, " el ", equipo1, " mete gol" Escribir "" minutoAleatorio: Escribir "En el minuto ",i, " le expulsan a un jugador del ", equipo1 Escribir "" minutoAleatorio: Escribir "En el minuto ",i, " le sacan amarilla a un jugador del ", equipo2 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay una falta de un jugador del ", equipo2 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay una falta de un jugador del ", equipo1 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay un fuera de juego del ", equipo1 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay un fuera de juego del ", equipo2 Escribir "" minutoAleatorio: Escribir "En el minuto ",i, " le expulsan a un jugador del ", equipo1 Escribir "" minutoAleatorio: Escribir "En el minuto ",i, " le sacan amarilla a un jugador del ", equipo2 Escribir "" De Otro Modo: Escribir "Minuto ", i, " sin ningun evento especial" Escribir "" Fin Segun Fin Para Escribir "---------------------------------" Escribir "FIN DEL PRIMER TIEMPO" Escribir "---------------------------------" Escribir "" //Mostrar resultado del partido en el primer tiempo Escribir "RESULTADO DEL PRIMER TIEMPO:" Escribir "****************************" Escribir golesEquipo1," ",equipo1, " ", golesEquipo2, " ", equipo2 Escribir "***************************" Escribir "" //Simulacion del Segundo Tiempo Repetir Escribir "Da enter, para empezar la simulacion del Segundo Tiempo" Leer simularSegundoTiempo; Hasta Que simularSegundoTiempo == "" //Ciclo Definir marcadorFinal Como Cadena Para i=45 Hasta 90 Con Paso 1 Hacer minutoAleatorio = Aleatorio(45,90) Segun Aleatorio(45, 90) Hacer minutoAleatorio: Escribir "En el minuto ", i, " hay una falta de un jugador del ", equipo2 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay una falta de un jugador del ", equipo1 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay un fuera de juego del ", equipo1 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay un fuera de juego del ", equipo2 Escribir "" minutoAleatorio: golesEquipo2 = golesEquipo2 + 1 Escribir "En el minuto ", i, " el ", equipo2, " mete gol" Escribir "" minutoAleatorio: golesEquipo2 = golesEquipo2 + 1 Escribir "En el minuto ", i, " el ", equipo2, " mete gol" Escribir "" minutoAleatorio: golesEquipo1 = golesEquipo1 + 1 Escribir "En el minuto ", i, " el ", equipo1, " mete gol" Escribir "" minutoAleatorio: golesEquipo1 = golesEquipo1 + 1 Escribir "En el minuto ", i, " el ", equipo1, " mete gol" Escribir "" minutoAleatorio: Escribir "En el minuto ",i, " le expulsan a un jugador del ", equipo1 Escribir "" minutoAleatorio: Escribir "En el minuto ",i, " le sacan amarilla a un jugador del ", equipo2 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay una falta de un jugador del ", equipo2 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay una falta de un jugador del ", equipo1 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay un fuera de juego del ", equipo1 Escribir "" minutoAleatorio: Escribir "En el minuto ", i, " hay un fuera de juego del ", equipo2 Escribir "" minutoAleatorio: Escribir "En el minuto ",i, " le expulsan a un jugador del ", equipo1 Escribir "" minutoAleatorio: Escribir "En el minuto ",i, " le sacan amarilla a un jugador del ", equipo2 Escribir "" De Otro Modo: Escribir "Minuto ", i, " sin ningun evento especial" Escribir "" Fin Segun Fin Para Escribir "---------------------------------" Escribir "FIN DEL PARTIDO" Escribir "---------------------------------" Escribir "" //Mostrar resultado del partido en el primer tiempo Escribir "EL RESULTADO FINAL FUE DE: " Escribir "****************************" Escribir golesEquipo1," ",equipo1, " ", golesEquipo2, " ", equipo2 Escribir "***************************" Escribir "" FinAlgoritmo