Integer :: a(3) = [ Int(z'ff'),Int(z'e3'),Int(z'02') ]
Print *,Popcnt(a)
End Program
Execution Results8 5 1
<Example Program>
| Program popcnt_example Integer :: a(3) = [ Int(z'ff'),Int(z'e3'),Int(z'02') ] Print *,Popcnt(a) End Program |
|
| Execution Results 8 5 1 |
|