( mrceeka | 2017. 04. 05., sze – 13:45 )

Ezt keresed?

Function Generate-Subsets ($set)
{
  $subsets=@()
  for ($i=1;$i -lt [math]::pow(2,$set.Count);$i++)
  {
    $mask=[convert]::ToString($i,2)
    $ss=@()
    for ($j=0;$j -lt $mask.Length;$j++)
    {
      if ($mask[$j] -eq "1") 
      {
        $ss+=$set[$mask.Length-$j-1]
      }
    }
    $subsets+=,$ss
  }
  return $subsets
}

$tömb1= "Egyes", "Kettes", "Hármas", "Négyes", "Ötös"
$tömb2= "Alma", "Körte", "Dinnye" 
$tömb3= "Virág", "Kert", "Ásó", "Szilva", "Tök" 
$tömb4= "Valami", "Valami2", "Valami3" 
foreach ($i1 in $tömb1)
{
    foreach ($i2 in $tömb2)
    {
       foreach ($i3 in Generate-Subsets($tömb3))
       {
         foreach ($i4 in $tömb4)
         {
            $items=$i3
            $items+=$i1,$i2,$i4
            $items -join ","
         }
       }

    }
}

Üdv,
Marci