请教一下这个问题

系统崩溃

用VB.Net效率也不差

Dim M(31) As Int32
Dim i As Int32 = 0
Dim X As Int32 = 1
Do While (X <= N)
   If (N And X) <> 0 Then
      M(i) = X
      i += 1
   End If
   X = X << 1
Loop

N为被分解数，分解结果在M中，其中有用元素共i个

马甲004

关注LZ的问题