Mega Sena

Publicado por Perfil removido (última atualização em 07/10/2016)

[ Hits: 2.001 ]

Download main.php




Sorteia 6 números até que o resultado seja o mesmo definido nas variáveis iniciais do programa. Na primeira vez que executei o programa, foram necessários quase 35 milhões de sorteios até que os números fossem acertados.

  



Esconder código-fonte

<?php

$escolhida1 = 1;
$escolhida2 = 14;
$escolhida3 = 25;
$escolhida4 = 32;
$escolhida5 = 57;
$escolhida6 = 60;

jogar();



function jogar(){

global $dezena01;
global $dezena02;
global $dezena03;
global $dezena04;
global $dezena05;
global $dezena06;

$dezena01 = rand(1,60);
$dezena02 = rand(1,60);
$dezena03 = rand(1,60);
$dezena04 = rand(1,60);
$dezena05 = rand(1,60);
$dezena06 = rand(1,60);

   while ($dezena01 > $dezena02){
      $memoria = $dezena01;
      $dezena01 = $dezena02;
      $dezena02 = $memoria;
   }
   while ($dezena01 > $dezena03){
      $memoria = $dezena01;
      $dezena01 = $dezena03;
      $dezena03 = $memoria;
   }
   while ($dezena01 > $dezena04){
      $memoria = $dezena01;
      $dezena01 = $dezena04;
      $dezena04 = $memoria;
   }
   while ($dezena01 > $dezena05){
      $memoria = $dezena01;
      $dezena01 = $dezena05;
      $dezena05 = $memoria;
   }
   while ($dezena01 > $dezena06){
      $memoria = $dezena01;
      $dezena01 = $dezena06;
      $dezena06 = $memoria;
   }
   while ($dezena02 > $dezena03){
      $memoria = $dezena02;
      $dezena02 = $dezena03;
      $dezena03 = $memoria;
   }
   while ($dezena02 > $dezena04){
      $memoria = $dezena02;
      $dezena02 = $dezena04;
      $dezena04 = $memoria;   
   }
   while ($dezena02 > $dezena05){
      $memoria = $dezena02;
      $dezena02 = $dezena05;
      $dezena05 = $memoria;
   }
   while ($dezena02 > $dezena06){
      $memoria = $dezena02;
      $dezena02 = $dezena06;
      $dezena06 = $memoria;
   }
   while ($dezena03 > $dezena04){
      $memoria = $dezena03;
      $dezena03 = $dezena04;
      $dezena04 = $memoria;
   }
   while ($dezena03 > $dezena05){
      $memoria = $dezena03;
      $dezena03 = $dezena05;
      $dezena05 = $memoria;
   }
   while ($dezena03 > $dezena06){
      $memoria = $dezena03;
      $dezena03 = $dezena06;
      $dezena06 = $memoria;
   }
   while ($dezena04 > $dezena05){
      $memoria = $dezena04;
      $dezena04 = $dezena05;
      $dezena05 = $memoria;
   }
   while ($dezena04 > $dezena06){
      $memoria = $dezena04;
      $dezena04 = $dezena06;
      $dezena06 = $memoria;
   }
   while ($dezena05 > $dezena06){
      $memoria = $dezena05;
      $dezena05 = $dezena06;
      $dezena06 = $memoria;
   }
}

//análise do resultado 
$count = 0;

while ($escolhida1!=$dezena01 or $escolhida2!=$dezena02 or $escolhida3!=$dezena03 or $escolhida4!=$dezena04 or $escolhida5!=$dezena05 or $escolhida6!=$dezena06){
   $count = $count + 1;
      $resultado = "\nDezena 01: $dezena01 \nDezena 02: $dezena02 \nDezena 03: $dezena03  \nDezena 04: $dezena04 \nDezena 05: $dezena05 \nDezena 06: $dezena06";  
      echo "\n$resultado\n";
      echo "Jogada nº $count\n";
      jogar();
}

while ($dezena01 == $dezena02 or $dezena01 == $dezena03 or $dezena01 == $dezena04 or $dezena01 == $dezena05 or $dezena01 == $dezena06 or
        $dezena02 == $dezena03 or $dezena02 == $dezena04 or $dezena02 == $dezena05 or $dezena02 == $dezena06 or $dezena03 == $dezena04 or
        $dezena03 == $dezena05 or $dezena03 == $dezena06 or $dezena04 == $dezena05 or $dezena04 == $dezena06 or $dezena05 == $dezena06){
            
            jogar();
               
        }

echo "$dezena01\n$dezena02\n$dezena03\n$dezena04\n$dezena05\n$dezena06";
echo "\n Foram necessárias $count jogadas para acertar todas as dezenas\n";
?>

Scripts recomendados

Números Primos

WShell - Comandos do sistema via web

Entendendo os operadores de atribuição

Criando um menu de paginação de resultados com algumas funcionalidades

Saber se acesso a aplicação web é feito pela rede interna ou externa


  

Comentários

Nenhum comentário foi encontrado.


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts