#!/usr/bin/perl -w
use strict;
 
my $len = 0;
if (@ARGV >= 1) {
  $len = $ARGV[0];
}
$len > 0 || die "Usage: genlen.pl number\n";
print "a" x $len;