var
i,j,n,k:integer;
begin
    readln(n);
i:=1;
while (i*i<=100) do
begin
        for j:=1 to i*i do
        write('*');
    writeln;
 i:=i+1;
end;
 if (i*i>100) then
    begin
        for j:=1 to 100 do
        write('*');
    write('...')
    end;
end.