Не могу разобраться в алгоритме

[kakawkin]

Суть программы у меня другая, так что я опишу проще что бы ясно стало всем.
Даны буквы в хаотичном порядке s:='zhemsop';
Даны числа в хаотичном порядке k:='8193815';
Их надо "скрестить":

for i:=1 to length(s) do
 for j:=1 to length(k) do
  result:=s[i]+k[j];
 end;
end;

Так они "скрестятся".
Но в моем случае надо таким образом накрестить ~3000 + очень много
И не пойму как организовать в данной ситуации многопоточность.

[s-andriano]

Для 3000 многопоточность будет только вредить, т.к. приведет к увеличению времени выполнения за счет накладных расходов на организацию потоков и синхронизацию между ними. Вряд ли имеет смысл использовать многопоточность даже для 3000000.

А вообще, задача прекрасно распараллеливается, так что методически с многопоточностью проблем быть не должно. Например, берешь 100 потоков, в каждом цикл длиной 30.

[kakawkin]

почему же будет хуже ? Ведь мой алгоритм похож на алгоритмы брутфорсов - они же умеют работать многопоточно

[Прик]

Ведь мой алгоритм похож на алгоритмы брутфорсов

Откуда такая уверенность? Программ, использующих метод для полного перебора всех вариантов, очень много и не факт, что все они построены по одной единственной схеме.

они же умеют работать многопоточно

А кто бы сомневался.
А что, для вас 100 потоков одновременного выполнения - это не многопоточность?
s-andriano прав - будет только хуже.
Почитать все о потоках можно здесь