#!/usr/local/bin/perl

for ($count = 1; $count <= 10; $count++) {
        printf ("%4d", 2 ** $count);
        if ($count % 3 == 0) {
                print ("\n");
        } else {
                print (" ");
        }
}
print ("\n");
