#print "(Babcdefghijklmnop"
#print "(0abcdefghijklmnop"

foreach ((0x20..0x7e)) {
    $s .= chr($_);
}

print "(B";
print "$s\n";
print "(0";
print "$s\n";
print "(B";