program autogrill;
var Q,i,j,lung: Int64;
t : char;
grillaperti,p: string;
Procedure inizia;
begin
SetLength(grillaperti,0);
lung:=0;
end;
procedure apri(p :string);
begin
Insert(p,grillaperti,lung);
SetLength(grillaperti,lung+1);
lung:=length(grillaperti);
for j:=0 to lung do writeln(grillaperti[j]);
end;
procedure chiudi (p:string);
begin
Delete(grillaperti,lung-1,1);
SetLength(grillaperti,lung-1);
lung:=length(grillaperti);
for j:=0 to lung do writeln(grillaperti[j]);
end;
procedure chiedi(p:string);
begin
writeln('ciao');
end;
begin
readln(Q);
for i:=0 to Q-1 do
begin
readln(t,p);
if t='a' then apri(p)
else if t='c' then chiudi(p);
end;
end.
cHJvZ3JhbSBhdXRvZ3JpbGw7CnZhciBRLGksaixsdW5nOiBJbnQ2NDsKICAgIHQgOiBjaGFyOwogICAgZ3JpbGxhcGVydGkscDogc3RyaW5nOwogICAgClByb2NlZHVyZSBpbml6aWE7CmJlZ2luClNldExlbmd0aChncmlsbGFwZXJ0aSwwKTsKbHVuZzo9MDsKZW5kOwoKcHJvY2VkdXJlIGFwcmkocCA6c3RyaW5nKTsKYmVnaW4KICBJbnNlcnQocCxncmlsbGFwZXJ0aSxsdW5nKTsKICBTZXRMZW5ndGgoZ3JpbGxhcGVydGksbHVuZysxKTsKICBsdW5nOj1sZW5ndGgoZ3JpbGxhcGVydGkpOwogIGZvciBqOj0wIHRvIGx1bmcgZG8gd3JpdGVsbihncmlsbGFwZXJ0aVtqXSk7ICAgCmVuZDsKCnByb2NlZHVyZSBjaGl1ZGkgKHA6c3RyaW5nKTsKYmVnaW4KICBEZWxldGUoZ3JpbGxhcGVydGksbHVuZy0xLDEpOwogIFNldExlbmd0aChncmlsbGFwZXJ0aSxsdW5nLTEpOwogIGx1bmc6PWxlbmd0aChncmlsbGFwZXJ0aSk7CiAgZm9yIGo6PTAgdG8gbHVuZyBkbyB3cml0ZWxuKGdyaWxsYXBlcnRpW2pdKTsgICAKZW5kOwoKcHJvY2VkdXJlIGNoaWVkaShwOnN0cmluZyk7CiBiZWdpbgogd3JpdGVsbignY2lhbycpOwogZW5kOwoKYmVnaW4KCXJlYWRsbihRKTsKCWZvciBpOj0wIHRvIFEtMSBkbwoJICAgICAgICAgIGJlZ2luCgkgICAgICAgICAgICByZWFkbG4odCxwKTsKCSAgICAgICAgICAgIGlmIHQ9J2EnIHRoZW4gYXByaShwKQoJICAgICAgICAgICAgICAgICAgICAgZWxzZSBpZiB0PSdjJyB0aGVuIGNoaXVkaShwKTsKCSAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCgkgICAgICAgICAgZW5kOwoKZW5kLgo=