お題11 Z†
ゼェーッ!
入力例1†
4
出力例1†
#### # # ####
入力例2†
7
出力例2†
#######
#
#
#
#
#
#######
提出†
Java†
lupin 2010/05/26 179bytes @narita
class z{static{try{int a=System.in.read()-48,i,j;for(i=1;i<=a;i++)for(j=1;j<=a;j++)System.out.print(i==1|i==a?j==a?"#\n":"#":j==(a-i+1)?"#":j==a?" \n":" ");}catch(Exception e){}}}
残念ながら2桁の入力に対応できない
lupin 2010/05/26 176bytes @narita
class z{static{try{int a=System.in.read()-48,i=0,j;for(;++i<=a;)for(j=0;++j<=a;)System.out.print(i==1|i==a?j==a?"#\n":"#":j==(a-i+1)?"#":j==a?" \n":" ");}catch(Exception e){}}}
3文字削った
Scala†
久しぶりに増えていたので挑戦してみる．
ただScalaが書きたかっただけ．短いのか不明．
インタプリタに貼り付け実行で動きます．
mayotako 2010/06/01 86bytes @local Scala version2.7.7.final
val n=readInt;(for(l<-1 to n)yield if(l%n<2)"#"*n else" "*(n-l)+"#").foreach(println)
正直リスト使いたかっただけだったり．
C†
murachue 2010/8/27 153bytes @narita
main(a,b,c){a=getchar()-'0';b=a;while(b--)printf("#");puts("");c=a;while(--c-1){b=c;while(--b)printf(" ");printf("#\n");}while(a--)printf("#");puts("");}
情けない…
murachue 2010/8/27 138bytes @narita : mayotakoのアイデアもらった。
main(a,b,c){a=getchar()-48;c=a;while(c--){if(c%(a-1)){b=c;while(b--)printf(" ");printf("#\n");}else{b=a;while(b--)printf("#");puts("");}}}
Ruby†
gokujo 2011/3/11 159bytes @narita : うーまだまだ
a=gets.to_i;def d(a);while a>0;print"#";if(a-=1)==0;puts"";end;end;end;d(a);b=a;while (b-=1)>0;c=b-1;while c>0;print" ";if(c-=1)==0;puts"#\n";end;end;end;d(a)
gokujo 2011/3/13 65bytes @narita : これ以上はわからない...
puts"#"*(a=gets.to_i);a.downto(3){|i|puts" "*(i-2)+"#"};puts"#"*a
