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==