print "A:\t"; print $A_freq[$_], "\t" for 0..20;