ALGORITMO QUE SIMULE EL LANZAMIENTO DE 3 DADOS

Simule el lanzamiento de 3 dados en pseint.

💻 Realizar un algoritmo que simule el lanzamiento de 3 dados, hasta que la suma de los mismos sea igual a 12, el algoritmo debe contar cuantas veces se lanzaron dados hasta lograr este valor y cuantas veces salio el número 6 en cada lado.

PSeInt Estricto : DESCARGA EL CÓDIGO

VER EL CÓDIGO

Algoritmo programacion_work
    Definir dado1, dado2, dado3, suma, num, d1, d2, d3 como Entero;
    suma <- 0;
    num <- 0;
    d1 <- 0;
    d2 <- 0;
    d3 <- 0;
    Mientras suma != 12 Hacer	
        num <- num + 1;
        dado1 <- Aleatorio(1,6);
        dado2 <- Aleatorio(1,6);
        dado3 <- Aleatorio(1,6);
        suma <- dado1 + dado2 + dado3;		
        Si (dado1 == 6) Entonces
            d1 <- d1 + 1;
        FinSi
        Si (dado2 == 6) Entonces
            d2 <- d2 + 1;
        FinSi
        Si (dado3 == 6) Entonces
            d3 <- d3 + 1;				
        FinSi				
        Escribir "LANZAMIENTO ",num,", SUMA : ", suma;		
    FinMientras
    Escribir "";
    Escribir "DADO 1 - SALIO 6 : ",d1," VECES";
    Escribir "DADO 2 - SALIO 6 : ",d2," VECES";
    Escribir "DADO 3 - SALIO 6 : ",d3," VECES";
FinProceso

PSeInt Flexible :

Algoritmo jaga_work  
    Mientras suma != 12 Hacer	
        num = num + 1
        dado1 = Aleatorio(1,6)
        dado2 = Aleatorio(1,6)
        dado3 = Aleatorio(1,6)
        suma = dado1 + dado2 + dado3		
        Si (dado1 == 6) Entonces
            d1 = d1 + 1
        FinSi
        Si (dado2 == 6) Entonces
            d2 = d2 + 1
        FinSi
        Si (dado3 == 6) Entonces
            d3 = d3 + 1		
        FinSi				
        Escribir "LANZAMIENTO ",num,", SUMA : ", suma
    FinMientras
    Escribir ""
    Escribir "DADO 1 - SALIO 6 : ",d1," VECES"
    Escribir "DADO 2 - SALIO 6 : ",d2," VECES"
    Escribir "DADO 3 - SALIO 6 : ",d3," VECES"
FinAlgoritmo

Este código es un programa escrito en el lenguaje de programación Pseint que simula el lanzamiento de tres dados y cuenta la cantidad de veces que cada dado ha salido con un valor de 6. El proceso comienza con la declaración de variables para almacenar el valor de cada dado, la suma de los tres dados y el número de lanzamientos realizados.

Luego se utiliza un bucle "Mientras suma != 12 Hacer" para simular el lanzamiento de los tres dados utilizando la función "Aleatorio(1,6)", se suman los valores de los tres dados y se guarda en la variable "suma"

Luego se utiliza una serie de estructuras de control "Si" para contar la cantidad de veces que cada dado ha salido con un valor de 6.

Finalmente, se muestra en pantalla el número de lanzamientos realizados, la suma de los tres dados y la cantidad de veces que cada dado ha salido con un valor de 6. El bucle se repetirá hasta que los tres dados sumen 12.