program langeliu_tusavimas;
  { 24 u‘davinys }
  var n, eil, i : integer;
      lyg       : boolean; { ar langeli— skai‡ius lyginis }
begin
  write ('­veskite langeli— skai‡i—: ');
  readln (n);
  case n of
     1, 2, 3, 5, 6, 9 : writeln ('U‘tužuoti negalima');
     4    : begin
              writeln ('**');
              writeln ('**')
            end;
     7    : begin
              writeln ('** ');
              writeln ('***');
              writeln (' **')
            end;
     else  begin
              writeln ('***');
              lyg := n mod 2 = 0;
              if lyg then eil := (n - 6) div 2
                     else eil := (n - 9) div 2;
              for i := 1 to eil do
                writeln ('* *');
              write ('***');
              if not lyg
                 then begin
                        writeln ('*');
                        writeln ('  **')
                      end
            end
  end
end.