File standardInput readLines map(a,b:=0;write(" "repeated(-1+a foreach(v,b=b+if("aiueoAIUEO"contains(v),1,0))/a split join size*40|0),"*
"))