program espresso;
const MAXN = 20000;
var N,i, ONE,TWO:integer;
    press :longint;
    S : array[1..MAXN] of string;
 
begin
	readln(N);
	for i:=1 to N do  readln(S[i]); 
	press:=0; ONE:=0; TWO:=0;
	for i:=1 to N do 
	               case S[i] of
	                   'espresso'  : ONE:=ONE+1;
	                   'cappuccino'  : ONE:=ONE+1;
	                   'espresso - doppio'  : TWO:=TWO+1;
	                   'affogato' : TWO:=TWO+1;
	                   'dead - eye'  : begin ONE:=ONE+1; TWO:=TWO+1;end;
	                   'irish - coffee'  : TWO:=TWO+1;
	                end;
  press:=press+(ONE+1) div 2 + TWO;
  writeln(press);
end.
				cHJvZ3JhbSBlc3ByZXNzbzsKY29uc3QgTUFYTiA9IDIwMDAwOwp2YXIgTixpLCBPTkUsVFdPOmludGVnZXI7CiAgICBwcmVzcyA6bG9uZ2ludDsKICAgIFMgOiBhcnJheVsxLi5NQVhOXSBvZiBzdHJpbmc7CiAgICAKYmVnaW4KCXJlYWRsbihOKTsKCWZvciBpOj0xIHRvIE4gZG8gIHJlYWRsbihTW2ldKTsgCglwcmVzczo9MDsgT05FOj0wOyBUV086PTA7Cglmb3IgaTo9MSB0byBOIGRvIAoJICAgICAgICAgICAgICAgY2FzZSBTW2ldIG9mCgkgICAgICAgICAgICAgICAgICAgJ2VzcHJlc3NvJyAgOiBPTkU6PU9ORSsxOwoJICAgICAgICAgICAgICAgICAgICdjYXBwdWNjaW5vJyAgOiBPTkU6PU9ORSsxOwoJICAgICAgICAgICAgICAgICAgICdlc3ByZXNzbyAtIGRvcHBpbycgIDogVFdPOj1UV08rMTsKCSAgICAgICAgICAgICAgICAgICAnYWZmb2dhdG8nIDogVFdPOj1UV08rMTsKCSAgICAgICAgICAgICAgICAgICAnZGVhZCAtIGV5ZScgIDogYmVnaW4gT05FOj1PTkUrMTsgVFdPOj1UV08rMTtlbmQ7CgkgICAgICAgICAgICAgICAgICAgJ2lyaXNoIC0gY29mZmVlJyAgOiBUV086PVRXTysxOwoJICAgICAgICAgICAgICAgIGVuZDsKICBwcmVzczo9cHJlc3MrKE9ORSsxKSBkaXYgMiArIFRXTzsKICB3cml0ZWxuKHByZXNzKTsKZW5kLg==