char s[99];i;k,l,m,n;main(j){for(n=0;gets(s);printf("%*s*\n",++n<743?(int)(i*40/m-.1):13,""))for(m=j=strlen(s),k=i=0;k<j;k++,m-=s[k]==32)for(l=0;l<10;l++)i+=s[k]=="AIUEOaiueo"[l];}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).