<>;$/=$";$s+=$_ for@a=<>;print 30*grep$_*10<=$s,@a