Welcome to collectivesolver - Programming & Software Q&A. A website you can trust. All programs tested and works. Contact: aviboots(AT)netvision.net.il
Bonsai Boy of New York Bonsai Trees and Accessories

BlueHost Web Hosting

Liquid Web Managed Dedicated Server: RAID 1 SSD with 16GB of RAM minimum! 24/7 On-Site Heroic Support! Industry-Leading SLA!

Ecommerce Software - Best Ecommerce Platform Made for You - Free Trial

Ecommerce Software - Best Ecommerce Platform Made for You - Free Trial

getflywheel wordpress hosting


Liquid Web Cloud VPS Hosting

10,499 questions

14,284 answers

573 users

How to count the total set bits in all numbers from 1 to N in VB.NET

1 Answer

0 votes
Imports System
 
Public Class Test
    Public Shared Function count_set_bits(n as integer)
        Dim count as Integer = 0
         
        Do While n > 0
            count += n And 1
            n >>= 1
        Loop
         
        return count 
    End Function
    
    Public Shared Function count_total_set_bits(n as integer)
        Dim BitCount As Integer = 0 
        Dim i As Integer
   
        For i = 1 to n
            BitCount += count_set_bits(i)
        Next 
        
        return BitCount
    End Function
     
    Public Shared Sub Main()
        Dim n as Integer = 6
        
        ' 0001
        ' 0010
        ' 0011
        ' 0100
        ' 0101
        ' 0110

        Console.WriteLine(count_total_set_bits(n))
         
    End Sub
End Class
 
 
' run:
 
' 9

 




answered Apr 13 by avibootz
edited May 9 by avibootz
...