4 lines
57 B
Perl
4 lines
57 B
Perl
|
for(my $n = 1024; $n > 0; $n >>= 1){
|
||
|
|
print "$n\n";
|
||
|
|
}
|