Project Euler - 5

Uma solução para o problema 5 do Project Euler.

[Int32]$Num = 20;
 
while ((($Num % 2) -ne 0) -or (($Num % 3) -ne 0) -or (($Num % 4) -ne 0) `
      -or (($Num % 5) -ne 0) -or (($Num % 6) -ne 0) -or (($Num % 7) -ne 0) `
      -or (($Num % 8) -ne 0) -or (($Num % 9) -ne 0) -or (($Num % 10) -ne 0) `
      -or (($Num % 11) -ne 0) -or (($Num % 12) -ne 0) -or (($Num % 13) -ne 0) `
      -or (($Num % 14) -ne 0) -or (($Num % 15) -ne 0) -or (($Num % 16) -ne 0) `
      -or (($Num % 17) -ne 0) -or (($Num % 18) -ne 0) -or (($Num % 19) -ne 0) `
      -or (($Num % 20) -ne 0)) {

      $Num+=20;
}

Clear-Host
Write-Host "O menor número divisível por todos os números de 1 a 20, sem resto, é: $Num"

O menor número divisível por todos os números de 1 a 20, sem resto, é: 232792560