[megaloman]

Fors1k_m, так каждый может! Вы мне Мурку сбацайте! Дайте формулу, а не программу.

[Fors1k]

Дайте формулу »

[megaloman]

Fors1k_m, давайте упростим задачу: есть символы 0 1 2 3 4 5 6 7 8 9 a b c d e f
То есть имеем 16 цифр стандартной шестнадцатиричной системы.
Всевозможные комбинации этих цифр можно получить элементарным счетом:
000000 000001 000002 ... 00000f 000010 ... ffffff
Возьмите любой калькулятор, который переводит числа из шестнадцатиричной системы в десятичную, и переведите в десятичную число:
ffffff=16 777 215
То есть вот это количество уникальных чисел от 000000 до ffffff
То есть символов (16) гораздо меньше рассматриваемых в предложенной задаче (36), а чисел намного больше, чем насчитали Вы 1 947 792 для бОльшего числа символов. То есть, Ваше число вычислено некорректно.
Похоже, и я ошибаюсь на 1 (не учитываю в подсчете 000000)

Кстати, вот калькулятор, можете там напрямую перевести число ZZZZZZ тридцатишестиричной системы в десятичную.

[Fors1k]

Кстати, так как мы говорим о паролях, то ab и ba это разные наборы данных, а значит количество возможных уникальных комбинаций здесь будет не 1 947 792, а 1 402 410 240.

Вычисление

Код:

Param(
    $m = 6, # Размер комбинации
    $n = 36 # Количество используемых элементов
)cls

function Get-Possibility($m,$n)
{
    $i,$j=1,1;1..$n|%{$i*=$_;}
    1..($n-$m)|%{$j*=$_};$i/$j
}

"Вариантов размещений: "+(Get-Possibility $m $n)

Итог:
Замер для(1/1000) 1 402 411 комбинаций показал:

Время: 12сек.
Размер файла:10,7MB

Для полного объема вариантов ориентировочно будет:

Время: 3ч.20мин
Размер файла:10,45GB

[YuS_2]

С комбинаторикой у меня отношения напряженные, но, ИМХО, у Вас вкралась ошибка. »

Возможно, делал по памяти, "на скорую руку"... но ошибка, скорее всего, при исправлении, приведет к большим значениям

Дайте формулу, а не программу. »

Например, вот

Кстати, так как мы говорим о паролях, то ab и ba это разные наборы данных, а значит количество возможных уникальных комбинаций »

Точно! Вот и ошибка моя нашлась, нам нужны размещения, а не сочетания...

Код:

function get-factorial([int]$num = 1) {
	switch ($num -le 1) {
		$true { $num }
		$false {$num*(get-factorial(--$num))}
	}
}

# количество размещений
$n = '0123456789abcdefghijklmnopqrstuvwxyz'
$m = 6

$A = (get-factorial $n.length)/(get-factorial ($n.length - $m))
$A

1402410240

[YuS_2]

Замер для(1/1000) »

Где-то в замерах ошибка, ибо:
скорость - 1000 комбинаций в секунду (такая скорость точно реальна?)
1402410240/1000/60/60/24 = 16,2316 дней

[Fors1k]

скорость - 1000 комбинаций в секунду »

Почему 1000 в секунду?) Перебор 1 402 411 Комбинаций занял 12сек.
Скорость=1 402 411 Комбинаций / 12 сек= 116 867 комбинаций в секунду. Но у меня ещё комп очень старый(Intel LGA775), думаю у других побыстрее будет.
Так как 1 402 411 - это одна тысячная от общего количества, то для всех вариантов время=12*1000/60/60=3 часа 20 минут.

[Fors1k]

Кстати, так как набор символов неисчерпаем, то количество возможных уникальных комбинаций для данной задачи будет не 1 402 410 240, а 2 176 782 336.
Вычисление:

Код:

Param(
    $m=6, # Размер комбинации
    $n=36 # Количество используемых элементов
)cls

function Get-FullPossibility($m, $n)
{
    $i=$j=$k=$z=1;($n-$m+1)..$n|%{$i*=$_};1..$m|
    ForEach{$j*=$_};1..$n|%{$k*=$_;};1..($n-$m)|
    ForEach-Object{$z*=$_};$p=[Math]::Pow($n,$m)

    Write-Output @{
        "Вариантов сочетаний " = ($i/$j)
        "Вариантов размещений" = ($k/$z)
        "Вариантов размещений с повторами" = $p
    }|FT -AutoSize
}

Get-FullPossibility $m $n

Код:

Name                             Value     
----                             -----     
Вариантов сочетаний              1947792   
Вариантов размещений             1402410240
Вариантов размещений с повторами 2176782336

Итог:
Замер для(1/1000) 2 176 783 комбинаций показал:

Время: 18сек.
Размер файла:16,6MB

Для полного объема вариантов ориентировочно будет:

Время: 5ч.
Размер файла:16,2GB

[megaloman]

YuS_2, Fors1k_m,

Следите за руками, никакого мошенничества!

Доводим задачу до маразма: набор символов 0123456789, надо посчитать, сколько чисел содержится в диапазоне от 000000 до 999999.
Считаем: раз два три четыре пять .... МИЛЬЁН! (если приплюсовать 000000)
Вот результаты скрипта YuS_2, (цитирую с минимальными изменениями для приведенного случая):

Код:

function get-factorial([int]$num = 1) {
	switch ($num -le 1) {
		$true { $num }
		$false {$num*(get-factorial(--$num))}
	}
}

# количество размещений
$n = '0123456789'
$m = 6

$A = (get-factorial $n.length)/(get-factorial ($n.length - $m))
$A

=151200
Если на клетке слона прочтешь надпись: буйвол, — не верь глазам своим.
Кстати, если длина строки =2 (00 - 99) Ваш скрипт декларирует 90. - что-то в консерватории надо менять.
Мой суперноут 2007 года выпуска по скрипту

Код:

@Echo Off
rem	Set "Simb=0 1 2 3 4 5 6 7 8 9 a b c d e f g h i j k l m n o p q r s t u v w x y z"
	Set "Simb=0 1 2 3 4 5 6 7 8 9"
	Set "FileOut=Z:\Box_Out\FileOut.txt
	
	>"%FileOut%" Echo %time%	
	>>"%FileOut%" (For %%i In (%Simb%) Do For %%j In (%Simb%) Do For %%k In (%Simb%) Do For %%l In (%Simb%) Do For %%m In (%Simb%) Do For %%n In (%Simb%) Do Echo %%i%%j%%k%%l%%m%%n)
	>>"%FileOut%" Echo %time%	
Exit /B

выдал результат:

Код:

9:58:10,67	
000000
000001
000002

......

999997
999998
999999
9:58:46,80

То есть, 1 000 000/36=28 000 строк/сек и мои отпотолочные предположения о 100 000 строк/сек не такие уж невероятные, а то и весьма скромные

Fors1k_m, Ура, конСЕКСус!

2 176 782 336 »

[Busla]

1947792 - число комбинаций... »

megaloman прав, вы посчитали размещение без повторений - количество вариантов перемешать символы в строке
впрочем, я опоздал со своим комментарием