프로그래밍 101의 작업에서 다시 한 번 영감을 얻은 또 다른 과제가 있습니다.

입력:

• 양의 정수 n >= 3. (이상해야한다)

산출:

• n첫 번째 줄에는 n별표가 있고 모든 새 줄에는 이전 줄보다 두 개의 별표가 있습니다. 별표 1 개를 칠 때까지 거기에서 모든 새로운 줄에는 별표로 돌아갈 때까지 줄보다 두 개의 별표가 있습니다 n. 스페이스 나 스페이스와 같은 것은 별표를 정렬하는 데 사용되어 실제로 모래 시계처럼 보입니다.

일반적인 규칙:

• 후행 줄 바꿈은 허용되지만 사용할 필요는 없습니다.
• 들여 쓰기는 필수입니다.
• 이것은 코드 골프이므로 바이트 단위의 최단 답변이 이깁니다.
• 이 과정은 C ++로 진행되므로 C ++로 솔루션을보고 싶어합니다.

테스트 사례 (n = 5) :

*****
 ***
  *
 ***
*****

숯 , 6 바이트

Ｇ↘←↗Ｎ*

간단하다. 폴리 그리기 G를 의에 *입력 찍은 측면 길이와 N의 측면이 아래쪽 및 오른쪽으로 수평 왼쪽 위로 및 우측 이동 엄버 :

*   *
 * *
  *
 * *
*****

그런 다음 아웃 라인을 자동 완성하고 채 웁니다.

*****
 ***
  *
 ***
*****

온라인으로 사용해보십시오!

파이썬 2, 57 바이트

N=n=input()
exec"print('*'*max(n,2-n)).center(N);n-=2;"*n

전체 프로그램. 한 줄씩 이동하여 중앙에 올바른 수의 별표를 인쇄합니다.

재귀 함수는 더 길었습니다 (67 바이트).

f=lambda n,p='':p+n*'*'+'\n'+(1%n*' 'and f(n-2,p+' ')+p+n*'*'+'\n')

또는

f=lambda n,p='':1/n*(p+'*\n')or f(n-2,p+' ').join([p+n*'*'+'\n']*2)

V , 12 바이트

Àé*hòl3Äjxx>

온라인으로 사용해보십시오!

V의 2D 특성의 장점을 과시하기 때문에 이와 같은 과제를 좋아합니다. 설명. 먼저, n 개의 별표 문자열을 만들어야합니다 . 그래서 우리는 이렇게합니다 :

À           " Arg1 times:
 é          " Insert the following single character:
  *         " '*'

참고로, 이것은 @ai*<esc>vim과 직접 동일 하며 레지스터 @a는 "arg1"로 사전 초기화됩니다. 숫자 입력이 훨씬 편리합니다.

그런 다음로 캐릭터를 오른쪽으로 이동합니다 h. 재미있는 부분은 다음과 같습니다.

ò           " Until an error is thrown:
 l          "   Move one character to the right. This will throw an error on anyline with only one asterisk in it
  3Ä        "   Make 3 copies of this line
    j       "   Move down one line
     xx     "   Delete two characters
       >    "   Indent this line once.

기술적으로이 마지막 부분은

òl3Äjxx>>ò

들여 쓰기 명령이 실제로 있기 때문 >>입니다. V는 불완전한 명령이 현재 행에 적용되는 것으로 가정하고, ò루프를 위해 두 번째 문자를 암시 적으로 채 웁니다 .

C ++ 메타 템플릿, 186 바이트

내 C 답변 의 명시 적 공식으로 Metatemplates가 경쟁하고 있습니다!

template<int N,int X=N*N+N-1>struct H{enum{I=X/(N+1)-N/2,J=X%(N+1)-N/2-1};S s{(J==-N/2-1?'\n':((I>=J&I>=-J)|(I<=J&I<=-J)?'*':' '))+H<N,X-1>().s};};template<int N>struct H<N,-1>{S s="";};

언 골프 드 :

using S=std::string;

template <int N, int X=N*N+N-1>
struct H{
 enum{I=X/(N+1)-N/2,J=X%(N+1)-N/2-1};
 S s{(J==-N/2-1 ? '\n' : ( (I>=J&I>=-J)|(I<=J&I<=-J) ?'*':' '))+H<N,X-1>().s};
};

template <int N> struct H<N,-1> {S s="";}; 

용법:

std::cout << H<5>().s;

비경쟁

재미를 위해서만 :

//T: Tuple of chars
template <char C, char...Tail> struct T { S r=S(1,C)+T<Tail...>().r; };

//specialization for single char
template <char C> struct T<C> { S r=S(1,C); };

//M: Repeated char
template <int N, char C> struct M { S r=S(N,C); };

//U: concatenates T and M
template <class Head, class...Tail> struct U { S r=Head().r+U<Tail...>().r; };

//specialization for Tail=M
template <int N, char C> struct U<M<N,C>> { S r{M<N,C>().r}; };

//specialization for Tail=T
template <char...C> struct U<T<C...>> { S r=T<C...>().r; };

//finally the Hourglass
template <int N, int I=0> struct H {
 S s=U<
       M<I,' '>,
       M<N,'*'>,
       T<'\n'>
      >().r;
 S r{s + H<N-2,I+1>().r + s};
};

//specialization for recursion end
template <int I> struct H<1,I> {
 S r=U<
       M<I,' '>,
       T<'*','\n'>
      >().r;
};

용법:

std::cout << H<5>().r;

PowerShell v2 +, 54 바이트

param($n)$n..1+2..$n|?{$_%2}|%{" "*(($n-$_)/2)+"*"*$_}

입력 걸린다 $n(홀수을 보장)을 두 범위를 구성 $n..1하고 2..$n그 다음 사용하고 그들을 함께 연결해 Where-Object만 이상한 사람을 선택 |?{$_%2}. 그것들은 루프로 공급됩니다. 각 반복마다 적절한 수의 공간을 구성하고 적절한 수의 별표로 문자열 연결합니다. 이러한 문자열은 파이프 라인에 남아 Write-Output있으며 프로그램 완료시 암시 적 삽입 개행을 통해 출력됩니다 .

예

PS C:\Tools\Scripts\golfing> 3,5,7|%{.\draw-an-hourglass.ps1 $_;""}
***
 *
***

*****
 ***
  *
 ***
*****

*******
 *****
  ***
   *
  ***
 *****
*******

파이썬, 78 바이트

들여 쓰기 만하면됩니다.

f=lambda n,i=0:n>1and' '*i+'*'*n+'\n'+f(n-2,i+1)+' '*i+'*'*n+'\n'or' '*i+'*\n'

용법:

print f(5)

C, 114 109 바이트

i,j;k(n){for(i=-n/2;i<=n/2;++i)for(j=-n/2;j<=n/2+1;++j)putchar(j==n/2+1?10:(i>=j&i>=-j)|(i<=j&i<=-j)?42:32);}

언 골프 :

i,j;
k(n){
 for(i=-n/2;i<=n/2;++i)
  for(j=-n/2;j<=n/2+1;++j)
   putchar(j==n/2+1?10:(i>=j&i>=-j)|(i<=j&i<=-j)?42:32);
}

이전 재귀 솔루션 :

p(a,c){while(a--)putchar(c);}
f(n,i){p(i,32);p(n,42);p(1,10);}
g(n,i){if(n>1)f(n,i),g(n-2,i+1);f(n,i);}
h(n){g(n,0);}

자바 스크립트 (ES6), 66 바이트

f=(n,s="*".repeat(n))=>n>1?s+`
`+f(n-2).replace(/^/gm," ")+`
`+s:s

여기서 아이디어는 이전에서 각 모래 시계를 생성하는 것입니다. 모든 줄의 시작 부분에 공백을 추가하고 n별표를 추가하고 추가하십시오 .

05AB1E , 21 20 19 17 바이트

카루소 컴퓨팅 덕분에 2 바이트 절약

;ƒ'*¹N·-×Nð×ì})û»

온라인으로 사용해보십시오!

설명

;ƒ                   # for N in [0 ... floor(input/2)+1]
  '*                 # push an asterisk
    ¹N·-×            # repeat the asterisk input-N*2 times
         Nð×ì        # prepend N spaces
             }       # end loop
              )      # wrap stack in a list
               û     # palendromize
                »    # join with newlines

MATL , 12 바이트

Q2/Zv&<~42*c

온라인으로 사용해보십시오!

설명

이 차종은의 사용 최근에 추가 된 대칭 범위 기능.

Q     % Input n implicitly. Add 1
      % STACK: 6
2/    % Divide by 2
      % STACK: 3
Zv    % Symmetric range
      % STACK: [1 2 3 2 1]
&<~   % Matrix of all pairwise "greater than or or equal to" comparisons
      % STACK: [1 1 1 1 1
                0 1 1 1 0
                0 0 1 0 0
                0 1 1 1 0
                1 1 1 1 1]
42*   % Multiply by 42 (ASCII code of '*')
      % STACK: [42 42 42 42 42
                 0 42 42 42  0
                 0  0 42  0  0
                 0 42 42 42  0
                42 42 42 42 42]
c     % Convert to char. Implicitly display, with char 0 shown as space
      % STACK: ['*****'
                ' *** '
                '  *  '
                ' *** '
                '*****']

PHP, 95 바이트

for($c=str_pad,$m=$n=$argv[1];$n<=$m;$n+=$d=$d>0||$n<2?2:-2)echo$c($c('',$n,'*'),$m,' ',2)."
";

배열에 행을 저장하고 모든 것을 출력하는 대신 for 루프는 1까지 내려간 다음 원래 숫자로 돌아갑니다.

C ++ 11, 93 바이트

#include<string>
using S=std::string;S f(int n,int i=0){S s=S(i,32)+S(n,42)+'\n';return n>1?s+f(n-2,i+1)+s:s;}

약간 골퍼되지 않음 :

std::string f(int n,int i=0){
 auto s=std::string(i,' ') + std::string(n,'*') + '\n';
 return n>1 ? s+f(n-2,i+1)+s : s;
}

용법:

std::cout << f(5);

MATL , 20 바이트

XyY>t1X!*t2X!+ZS42*c

온라인으로 사용해보십시오!

R, 77 바이트

M=matrix(" ",n<-scan(),n);for(i in 1:n)M[i:(n-i+1),i]="*";cat(M,sep="",fill=n)

그 다음을 통해 출력한다 문자 매트릭스 작성 cat하여, fill=n반드시 선이 제대로 정렬하고 있습니다. 소자 열 먼저 행렬에 저장된 참고 (즉 처음 두 요소가 M[1,1]및 M[2,1]아닌 M[1,2]).

자바 7, 170165 164 바이트

5 바이트를 절약 한 @Hypino에게 감사합니다.
1 바이트를 절약 한 Kevin에게 감사합니다.

String c(int n,int x){String s,c,t=c=s=" ";int i=0;for(;i++<n;s+="*");for(i=x;i-->=0;c+=" ");for(i=x;i-->0;t+=" ");return(n=n-2)>=0?s+"\n"+c+c(n,++x)+"\n"+t+s:"*";} 

PHP-95 바이트

$c=2;for($i=$a=$argv[1];$i<=$a;$i-=$c*=$i<2?-1:1)echo str_pad(str_repeat("*",$i),$a," ",2)."
";

대신 실제 줄 바꿈을 사용하여 바이트를 저장했습니다. "\r"

Pyth, 22 바이트

j+J.e+*dk*b\*_:1hQ2_PJ

STDIN에 정수를 입력하여 결과를 인쇄하는 프로그램.

온라인으로 사용해보십시오

작동 원리

j+J.e+*dk*b\*_:1hQ2_PJ  Program. Input: Q
              :1hQ2     Range from 1 to Q+1 in steps of 2. Yields [1, 3, 5, ..., Q]
             _          Reverse
   .e                   Enumnerated map with b as elements and k as indices:
      *dk                 k spaces
         *b\*             b asterisks
     +                    Concatenate the spaces and asterisks
  J                     Store in J
                    PJ  All of J except the last element
                   _    Reverse
 +                      Concatenate J and its modified reverse
j                       Join on newlines
                        Implicitly print

C, 195191 바이트

조금 더 작아야한다

x,y,i;f(n){for(i=0;i<n;i+=2,puts("")){for(y=n-i;y<n;y+=2,putchar(32));for(x=i;x++<n;putchar(42));}for(i=n-2;~i;i-=2,puts("")){for(y=n-i+2;y<n;y+=2,putchar(32));for(x=i-1;x++<n;putchar(42));}}

우리는 그것을 테스트 할 수 있습니다 여기 ideone에

C, 79 바이트

h(m,n,k){for(n=m++,k=n*m;--k;putchar(k%m?abs(k%m-m/2)>abs(k/m-n/2)?32:42:10));}

카운트 다운 변수 k를 행 및 열 인덱스로 분할합니다 . 열 인덱스가 0 (행의 마지막 문자)이면 줄 바꿈 문자 (10)를 출력합니다. 그런 다음 행과 열 인덱스가 중앙 별표 주위에 오도록 조정합니다. 그런 다음 abs(x) < abs(y)공백을 출력하기위한 짧은 조건입니다.

루비, 55 54 바이트

f=->n,s=0{puts a=' '*s+?**n;(f[n-2,s+1];puts a)if n>1}

자바 7, 156 바이트

상당히 간단합니다. 와 함께 선 n, 별과 함께 j, 공백 s및로 방향을 추적 d합니다. 나는 보드에 비 재귀 Java 답변을 원했지만 조금 짧아도 아프지 않습니다. :)

String f(int n){String o="";int j=n,s=0,i,d=0;for(;n-->0;o+="\n"){for(i=0;i++<s;)o+=" ";for(i=0;i++<j;)o+="*";d+=j<2?1:0;j+=d<1?-2:2;s+=d<1?1:-1;}return o;}

줄 바꿈으로 :

String f(int n){
    String o="";
    int j=n,s=0,i,d=0;
    for(;n-->0;o+="\n"){
        for(i=0;i++<s;)
            o+=" ";
        for(i=0;i++<j;)
            o+="*";
        d+=j<2?1:0;
        j+=d<1?-2:2;
        s+=d<1?1:-1;
    }
    return o;
}

APL, 19 바이트

' *'[1+∘.≤⍨(⊢⌊⌽)⍳⎕]

테스트:

      ' *'[1+∘.≤⍨(⊢⌊⌽)⍳⎕]
⎕:
      5
*****
 *** 
  *  
 *** 
*****

설명:

                 ⎕   ⍝ read number  
                ⍳    ⍝ 1..N
           ( ⌊ )     ⍝ at each position, minimum of
            ⊢        ⍝ 1..N
              ⌽      ⍝ and N..1 (this gives 1..N/2..1)
       ∘.≤⍨          ⍝ outer product with ≤
     1+              ⍝ add 1 to each value
' *'[             ]  ⍝ 1→space, 2→asterisk

하스켈, 84 바이트

f n|l<-div n 2,k<-[-l..l]=putStr$unlines[[" *"!!(fromEnum$abs x<=abs y)|x<-k]|y<-k]

C (gcc) , 80 74 바이트

snoopy419 님, 감사합니다.

-Du(x,k)=for(x=~n;x+=2,x<n;putchar(k))

i;j;f(n){u(i,10)u(j,i*i<j*j?32:42);}

온라인으로 사용해보십시오!

PowerShell , 54 50 바이트

filter f{if($_-1){'*'*$_;($_-2)|f|%{" $_"}}'*'*$_}

온라인으로 사용해보십시오!

PHP ,104 88 바이트

for(;$i++<$argn;$a.='**',$i++>1?$o=$s.$o:1)$o.=$s=str_pad("*$a",$argn,' ',2)."
";echo$o;

온라인으로 사용해보십시오!

이것은이 도전에서 PHP의 최저 점수를이기는 것은 아니지만 너무 버려서 버릴 수는 없습니다.

좋아, 그래서 나는이 도전에서 PHP에 대해 (긴하지 않은) 최저 점수가 되려고 골프를 쳤지 만 여전히 미쳤다는 사실은 바뀌지 않습니다.

$ echo 7|php -nF hour.php
*******
 *****
  ***
   *
  ***
 *****
*******

그루비, 66 바이트

{n->((n..1)+(2..n)).each{if(it%2>0){println(("*"*it).center(n))}}}

사용해보십시오 : https://groovyconsole.appspot.com/script/5145735624392704

설명 :

((n..1)+(2..n)) -n으로 역 회색 [n,..,1,..,n]

.each{if(it%2>0){...} -홀수 요소를 반복합니다.

println(("*"*it).center(n)) -n 개의 별을 중심에두고 개행에 각각 인쇄하십시오.

PHP, 191 바이트

$b=[];for($i=$a=$argv[1]+1;$i>0;$i--){$i--;if($i<=1){$c=str_pad("*",$a," ",2)."\n";break;}$b[]=str_pad(str_repeat("*",$i),$a," ",2)."\n";}echo implode("",$b).$c.implode("",array_reverse($b));

다음과 같이 실행 php -f golf_hourglass.php 15

# php -f golf_hourglass.php 15
***************
 *************
  ***********
   *********
    *******
     *****
      ***
       *
      ***
     *****
    *******
   *********
  ***********
 *************
***************

그 배후의 아이디어는 상단 절반 (싱글 앞 부분 *)을 만든 다음 상단 부분을 두 번 에코하지만 두 번째는 역순으로 에코하는 것입니다.

파이크, 22 19 바이트

F-ed*ih\**+)2%'X_OX

여기 사용해보십시오!

F          )        -    for i in range(input)
 -                  -        Q-i
  e                 -       floor(^/2)
   d*               -      ^*" "
          +         -     ^+V
     ih             -       i+1
       \**          -      ^*"*"
            2%      -   ^[::2]
              'X_   - splat(^),
                       reversed(^)
                 OX - splat(^[:-1])

C, 117 바이트

void p(c,n){while(n--)putchar(c);}void h(n){for(int i=n;i>=-n;i-=i==1?4:2){p(32,(n-abs(i))/2);p(42,abs(i));p(10,1);}}

언 골프

void printNum(c, n) {
  while (n--)
    putchar(c);
}

void hourGlass(n) {
  for (int i = n; i >= -n; i-=i==1?4:2) {
    printNum(32, (n - abs(i)) / 2);
    printNum(42, abs(i));
    printNum(10, 1);
  }
}