program editor;
var a : char;
var b : integer;
procedure Line (ch:char; ln:integer);
var symbol : integer;
begin
write('{');
for symbol:=1 to ln do
write('ch');
writeln('}');
end;
begin
read(a,b);
Line(a,b);
end.