int n,a,x,y,z[2d6];
char s[2d6];
{
	rd(n);
	REP(n){
		x=y=11;
		rd(s@n);
		REP(i,n-6){
			if(i>=4){
				a=0;a+="good"[0..3]!=s[i-4..];
				x<?=a+z[i];
			}
			a=0;a+="problem"[0..6]!=s[i..];
			y<?=x+a;
			z[i+11]=z[i+10]+!a;
		}
		wt(y);
	}
}