偽のマーキーテキスト

46

このチャレンジでは、偽のマーキーテキストは、スクロールのように部分的に表示されるテキストです。

いくつかの例：

testing 4

   t
  te
 tes
test
esti
stin
ting
ing
ng
g


hello 2

 h
he
el
ll
lo
o


foobarz 3

  f
 fo
foo
oob
oba
bar
arz
rz
z


Something a bit longer 10

         S
        So
       Som
      Some
     Somet
    Someth
   Somethi
  Somethin
 Something
Something 
omething a
mething a 
ething a b
thing a bi
hing a bit
ing a bit 
ng a bit l
g a bit lo
 a bit lon
a bit long
 bit longe
bit longer
it longer
t longer
 longer
longer
onger
nger
ger
er
r


small 15

              s
             sm
            sma
           smal
          small
         small
        small
       small
      small
     small
    small
   small
  small
 small
small
mall
all
ll
l


aaa 3

  a
 aa
aaa
aa
a


brace yourself 6

     b
    br
   bra
  brac
 brace
brace 
race y
ace yo
ce you
e your
 yours
yourse
oursel
urself
rself
self
elf
lf
f

上記のように、2つの入力を取り込んで出力を出力するプログラムまたは関数を作成する必要があります。出力で末尾のスペースを出力する場合としない場合があります。これはコードゴルフなので、バイト単位の最短コードが優先されます。

プログラムがスタンドアロンの場合（つまり、実行時に実際に行を印刷する場合）（入力はハードコーディングできますが、変更は簡単です）、出力の各行の間に少しスリープすると、-10のボーナスが得られます。

code-golf  string 
— カリドール
ソース
「出力を含む」とはどういう意味ですか？
— オプティマイザー
1
また、単にスペースである最初と最後の行を印刷する必要がありますか？
— オプティマイザー
2
これに触発された？
— Spikatrix
1
最初の空行は許可されているようです。最後に別の空の行はどうですか？
— nimi
2
「目に見える出力のみ」について話しているので、入力は印刷可能なASCIIのみであると想定できますか？（文字コード0x20〜0x7E）
— マーティンエンダー

回答:

24

CJam、12 11バイト

デニスが保存した1バイト。

,Sf*\f+$zN*

「入力はハードコーディングできますが、簡単に変更できます」を使用しています。これは、入力が既にスタック上にあることを想定している"testing" 4ため、たとえば上記の前に追加できます。

ここでテストしてください。

説明

目的の出力の転置がはるかに簡単であることに注意してください。

   testing
  testing
 testing
testing

私達はちょうど作成する必要があるので、n先頭に追加し、ラインをiのためのスペースiからn-1下へと0。それはコードがすることです：

,            e# Turn n into a range [0 1 .. n-1]
 Sf*         e# Turn each i into a string of i spaces.
    \f+      e# Swap this array with the input string and append it to each of the
             e# strings of spaces.
       $     e# Sort the array to have the string with n-1 spaces first.
        z    e# Transpose the grid.
         N*  e# Join the lines with newline characters.

19-10 = 9？

「各行の間に少し眠る」ボーナスは少し曖昧で危険なものですが、ここでは配列のすべての順列を計算することによって各行の後に単に停止する19バイトバージョンがあり[0 1 .. 7]ます。オンラインインタプリタでは、これにより最終結果が少し遅れて表示されますが、Javaインタプリタを使用する場合、実際には「少しスリープ」した後に各行が出力されます。

,Sf*\f+$z{oNo8e!;}/
— マーティン・エンダー
ソース
のいい使い方z。入力と仮定すると、印刷可能なASCII、あなたは置き換えることができているW%と$。
— デニス
@デニスああ、私はそれが好きです。これについての説明をOPに依頼しました。（そうは言っても、私はz常にアスキーグリッドベースのチャレンジに使用しています。）
— マーティンエンダー
15

C、69バイト

printf magic！

f(s,n,i)char*s;{for(i=n;*s;i?i--:s++)printf("%*s%.*s\n",i,"",n-i,s);}

説明付きの拡張バージョン：

f(s,n,i)char*s;{       /* s is the string, n is the width of the grid. */
  for(i=n;             /* i is the number of preceding spaces. */
      *s;              /* Stop once we reach the end of the string. */
      i?i--:s++)       /* Decrease the number of spaces, and when there's 
                          none left start truncating the string itself. */
  printf("%*s          /* The first argument is the minimum width to print the 
                          string (left padded with spaces) and the second 
                          argument is the string to print. We use the empty 
                          string just to print the i spaces. */
    %.*s              /* The third argument is the maximum number of 
                         characters from the string (which is the fourth 
                         argument) to print. */
    \n",i,"",n-i,s);
}

次に例を示します。

$ ./marquee stackoverflow 12

           s
          st
         sta
        スタック
       スタック
      スタッコ
     スタコフ
    スタック
   スタックオーバー
  スタックオーバー
 スタックオーバー
stackoverflo
タックオーバーフロー
ackoverflow
ckoverflow
コバーフロー
オーバーフロー
verflow
エルフロー
rflow
フロー
低い
わー
w
— CL-
ソース
14

Pyth、13バイト

jb.:++K*dQzKQ

オンラインで試す：Pyth Compiler / Executor

説明

                 implicit: z = input string, Q = input number
      K*dQ       K = " " * Q
    ++K   zK     K + z + K
  .:        Q    all substrings of length Q
jb               join by newlines and print
— ジャクベ
ソース
6

Python 65 63

s=lambda t,s:'\n'.join((' '*s+t)[i:s+i]for i in range(len(t)+s))

これは実際に例を作成するために使用されました。ベースラインソリューション。

>>> print(s("foobarz", 3))

  f
 fo
foo
oob
oba
bar
arz
rz
z
— カリドール
ソース
2
私はそれをテストしていませんが、内部の角かっこを削除できるはずですjoin
— 地下
@undergroundmonorail right
— Caridorc
6

Javascript（ES7ドラフト）、61バイト

f=(s,l)=>[x.substr(i,l)for(i in x=' '.repeat(l)+s)].join(`
`)
<input id="str" value="Some String" />
<input id="num" value="5" />
<button onclick="out.innerHTML=f(str.value, +num.value)">Run</button>
<br /><pre id="out"></pre>
スニペットを展開

Javascript（ES6）ハードコーディングされた入力、47バイト

変数s（文字列）とl（長さ）にハードコードされた入力があると仮定すると、各行にアラートを表示して、印刷を47バイトに減らすことができます。

for(i in x=' '.repeat(l)+s)alert(x.substr(i,l))
— アンダースコア
ソース
5

K、19バイト

{x#'![1]\(x#" "),y}

文字列の先頭にxスペース（x#" "）を付加しますy。次に、演算子の「固定小数点スキャン」形式\を使用して、回転した文字列のセットを作成します。Kの固定小数点は、関数の適用結果が繰り返しの結果を返す場合、または初期入力が再検討される場合、反復を停止します。以来![1]一度に文字列の1ステップ回転します、![1]\巡回置換のための素晴らしいイディオムです。次に、で結果をトリミングしますx#'。

サンプル実行：

  {x#'![1]\(x#" "),y}[4;"some text"]
("    "
 "   s"
 "  so"
 " som"
 "some"
 "ome "
 "me t"
 "e te"
 " tex"
 "text"
 "ext "
 "xt  "
 "t   ")
— JohnE
ソース
5

J（22）

これは私が予想したよりも長くなりましたが、それほど悪くはないと思います。

[{."0 1[:]\.(' '#~[),]

おもしろい事実：[との]いずれも実際には一致していないか、互いに関係があります。

— ɐɔıʇǝɥʇuʎs
ソース
3つの小さな変更後：[{."1]]\.@,~' '#~[（18バイト）。
— ランダラ
5

ジュリア、75バイト

(s,n)->(n-=1;print(join([(" "^n*s*" "^n)[i:n+i]for i=1:length(s)+n],"\n")))

これにより、入力として文字列と整数を受け入れ、出力を出力する名前のない関数が作成されます。呼び出すには、名前を付けf=(s,n)->(...)ます。

Ungolfed +説明：

function f(s, n)
    # Decrement n by 1
    n -= 1

    # Construct the lines as an array using comprehension by repeatedly
    # extracting subsets of the input string padded with spaces
    lines = [(" "^n * s * " "^n)[i:n+i] for i = 1:length(s)+n]

    # Print the array elements separated by a newline
    print(join(lines, "\n"))
end

例：

julia> f("banana", 3)
  b
 ba
ban
ana
nan
ana
na 
a

julia> f("Julia", 6)
     J
    Ju
   Jul
  Juli
 Julia
Julia 
ulia  
lia   
ia    
a

このソリューションは、プログラムに既に存在すると仮定されている場合s、66バイトであることに注意してくださいn。

— アレックス・A
ソース
5

QBasic、56-10 = 46

これはQBasicであり、オートフォーマッターはいくつかのスペースに拡張?しPRINTて追加します。QB64でテスト済みですが、ここにはDOS QBasicで動作しないものはないはずです。

s=SPACE$(n)+s
FOR i=1TO LEN(s)
?MID$(s,i,n)
SLEEP 1
NEXT

QBasicは、一般的には、文字列操作との良好ではありませんが、非常に便利な存在である関数が戻り、そのスペースの与えられた数！

いくつかの自由を取って、このコードは、変数が期待「入力は、ハードコードされてもよい」sであるとDIMD」AS STRINGを回避するために、$タイプサフィックスを、同様に割り当てられた文字列sおよび数値n。

前文の例：

DIM s AS STRING
s="string"
n=4

出力：

   s
  st
 str
ストリ
トリン
リング
ing
ng
g

上の空白行は、FORループを1ではなく2 から開始することで削除できます。

ボーナス：わずか4バイトのCLS直前NEXTに追加すると、これが... 本当のマーキーになります！

マーキー

I PRINT CHR$(3)QBasicを。：^ D

— DLosc
ソース
QBasicをもう一度試す必要があります...それは私が最初に学んだことです
— カナダのルークREINSTATE MONICA
5

ルビー、68、55バイト

a=" "*$*[1].to_i+$*[0]+" ";a.size.times{|b|puts a[b...b+$*[1].to_i]}

@blutorangeからの更新後：

a=" "*(z=$*[1].to_i)+$*[0];a.size.times{|b|puts a[b,z]}

出力：

         S
        So
       Som
      Some
     Somet
    Someth
   Somethi
  Somethin
 Something
Something 
omething a
mething a 
ething a b
thing a bi
hing a bit
ing a bit 
ng a bit l
g a bit lo
 a bit lon
a bit long
 bit longe
bit longer
it longer 
t longer 
 longer 
longer 
onger 
nger 
ger 
er 
r

ruby marquee.rb "Something a bit longer" 10

批判を求めるように最初の提出。

— ディッキーボーイ
ソース
1
ルビーのショートカットを使用して、よくできているように見えます。最後のスペースがneccessaryものの（「のみ表示出力事項」）ではないようです、そしてあなたは、一時的な変数を使用して、いくつかのバイトを保存することができます：a=" "*(z=$*[1].to_i)+$*[0];a.size.times{|b|puts a[b,z]}
— blutorange
@blutorangeフィードバックをありがとう！
— ディッキーボーイ
どういたしまして。必要に応じて回答を自由に編集してください;）
— blutorange
4

Haskell、61 59 54バイト

m n=unlines.scanr((take n.).(:))[].(replicate n ' '++)

使用例：

*Main> putStr $ m 6 "stackoverflow"

     s
    st
   sta
  stac
 stack
stacko
tackov
ackove
ckover
koverf
overfl
verflo
erflow
rflow
flow
low
ow
w

*Main>

編集：開始/終了の空行が許可されます

— ニミ
ソース
4

Bash、109-10 = 99バイト

私は解決策を書くのにかかった時、私は激しくbeatられたことを知っています。それにもかかわらず、私はそれを投稿するには長すぎて投稿しませんでした...

それに加えて、現在のディレクトリの量に基づいてユーザーが調整できる行間印刷の時間など、いくつかのユニークな機能があります！（ディスクの感じ方にもよりますが、やや矛盾しています）

l=${#1};s=$1;for j in `seq 1 $2`;do s=" $s";done;for i in `seq 0 $((l+$2))`;do echo "${s:i:$2}";find 1>2;done

例：

cd <some directory in which you own everything recursively>
Marquee.sh "Test Case" 4

   T
  Te
 Tes
Test
est 
st C
t Ca
 Cas
Case
ase
se
e

非ゴルフとコメント：

l=${#1} #Length of the incoming string
s=$1 #Can't reassign to the parameter variables, so give it another name
for j in `seq 1 $2`; do
    s=" $s" # Put on the padding spaces
done

for i in `seq 0 $((l+$2))`; do
    #Cut the string and print it. I wish I could lose "padding" that easily!
    echo "${s:i:$2}" #Format is ${string:index:length}, so always the same
    # length, with the index moving into the string as the loop advances
    find 1>2  #Wait "a bit". From ~/, about 6 minutes per line on my junky 
    # computer with a huge home directory. Probably in the <1 sec range for
    # most people.
    #This actually has the same character count as sleep(X), but is much
    # more fun!
done

これを実際に試したことはありません。提案やコメントを歓迎します！

— ソンポム
ソース
4

Pure Bash、61バイト

printf -vs %$2s"$1"
for((;++i<${#1}+$2;)){
echo "${s:i:$2}"
}

出力：

$ ./marquee.sh testing 4
   t
  te
 tes
test
esti
stin
ting
ing
ng
g
$
— デジタル外傷
ソース
私は「純粋な」Bashの区別を理解していないと思うので、この提案は
— 役に立た
3

Perl、50

$c=$" x$^I;$_="$c$_$c";sleep say$1while(/(?<=(.{$^I}))/g)

57文字+3のために-i、-nと-l。-10睡眠のための文字。

-iは、数値入力に使用され、に保存され$^Iます。基本的に、i入力の前後にスペースを追加し、すべてのi文字を検索して、でそれらをループしますwhile。sayに1入力できる便利な値を返しますsleep。

echo "testing" | perl -i4 -nlE'$c=$" x$^I;$_="$c$_$c";sleep say$1while(/(?<=(.{$^I}))/g)'
— hmatt1
ソース
私はこれが古いことを知っていますが、それはちょうど最初のページに戻ってジャンプし、私はこれをいくらか縮小することに挑戦しました：s/^|$/$"x$^I/eg;sleep say$1 while s/.(.{$^I})/$1/。また、-lフラグを失う可能性がありますが、経由で実行する場合は、デフォルトのフラグではない-i -nため、5をカウントする必要があると思います。それでも44まで下がるはずです！-iecho -n "testing" | perl -i4 -nE'...'
— ドムヘイスティングス
@DomHastingsありがとうDom！いい仕事です、後で答えを編集します:)
— hmatt1
3

POSIXシェル、94

[ $3 ]||set "`printf "%${2}s"`$1" $2 t
[ "$1" ]&&printf "%-.${2}s" "$1" "
"&&$0 "${1#?}" $2 t

perlに近いように見えますが、これは本当にシェルです！

最初の行は、必要な先行スペースを追加しますが、これは最初のループのみです。$ 3を設定して、そうしたことを示します。

2行目（NB埋め込み改行）は、入力がなくなるまで繰り返し、文字列の最初のn文字を出力し、$ 1から最初の文字を削除してそれ自体を呼び出します。

Debianでテスト済み/bin/dash-サンプル出力は次のとおりです。

./marquee "testing" 4

   t
  te
 tes
test
esti
stin
ting
ing
ng
g

./marquee "もう少し長いもの" 10

         S
        So
       Som
      Some
     Somet
    Someth
   Somethi
  Somethin
 Something
Something 
omething a
mething a 
ething a b
thing a bi
hing a bit
ing a bit 
ng a bit l
g a bit lo
 a bit lon
a bit long
 bit longe
bit longer
it longer
t longer
 longer
longer
onger
nger
ger
er
r

./marquee "small" 15

              s
             sm
            sma
           smal
          small
         small
        small
       small
      small
     small
    small
   small
  small
 small
small
mall
all
ll
l
— トビー・スペイト
ソース
-10ボーナスを得るために9文字を追加できます！["$ 1"] && printf "％-。$ {2} s" "$ 1" "" && sleep 1 && $ 0 "$ {1＃？}" $ 2 t
— トビースペイト
3

Python 2、51バイト/ 37バイト

ハードコーディングされた入力なし（51バイト）：

def f(s,n):
 s=" "*n+s
 while s:print s[:n];s=s[1:]

のように呼び出しf("testing", 4)ます。

ハードコーディングされた入力（37バイト）の場合：

s="testing";n=4

s=" "*n+s
while s:print s[:n];s=s[1:]

どちらのバージョンも、スペースの最初の行を出力します。

— Sp3000
ソース
3

Python 2（54バイト-10 = 44） 64 62 60 46

（ハードコードされた入力の行はバイトカウントに追加されないと仮定しました。）

印刷行間で実際にスリープするプログラムはまだありませんでした。そのため、そのようにマーキーのように見えるので、印刷するプログラムを作成しました。このプログラムは、Python 3ではさらに2バイトです。

編集：プログラムは現在、スリープ状態ではなく計算を実行します。iプログラムが定数として保存しないように計算に使用しましたが、毎回計算する必要があります。

ここでPython 3を試してみてください（Python 2のreplにはバグがあります）

i=0
while s[i-n:]:print((' '*n+s)[i:n+i]);i+=1;i**7**7
— mbomb007
ソース
たぶん、time.sleepあなたが使用できるいくつかの長い計算がありますか？また、whileループを使用するほうが少し短くなりますi=0\nwhile s[i-n:]:print(' '*n+s)[i:n+i];i+=1
— 。– xnor
@xnor Exponentiationを数回実行すると、計算にかなり役立ちます。
— mbomb007
@ mbomb007 pythonに実際に実行させるために計算の値を保存する必要はないと思います（「q =」を保存できます）。また、x ^ 7 ^ 7は数学的にはx ^ 49と同等ですが、pythonはx ^ 49をわずかに速く解決するようです。そのようにしていくつかの文字を保存できます。
— ソンポム
@Sompom replで試してください。式を1つのべき乗に統合すると、時間遅延が完全になくなります。しかし、私は削除しq=ます。ありがとう。
— mbomb007
@Sompom Exponentiationは右結合であるため、実際にはi**(7**7)
— -Sp3000
3

Pyth、12バイト

jb.:X*dyQQzQ

デモンストレーション。

Pyth、17-10 = 7バイト

FN.:X*dyQQzQ&.p9N

このバージョンでは、ラインプリント間の遅延が使用されます。これはコマンドラインコンパイラで確認できます。こちらから入手できます。

以下を実行します。

pyth -c 'FN.:X*dyQQzQ&.p9N' <<< 'testing
4'

これには、各印刷の前に約0.3秒の遅延があります。より長い遅延を希望する場合は、次を使用できます。

FN.:X*dyQQzQ&.pTN

これには約4秒の遅延があります。

— isaacg
ソース
3

Java、133 119 115

int i;void f(String s,int n){for(;++i<n;)s=" "+s+" ";for(;i<=s.length();)System.out.println(s.substring(i-n,i++));}

ロングバージョン：

int i;
void f(String s, int n) {
    for(; ++i < n;)
        s = " " + s + " ";
    for(; i<=s.length();)
        System.out.println(s.substring(i-n, i++));
}

文字列にパディングが適用され、パディングされた文字列のサブストリングがコンソールに出力されます。

@KevinCruijssenのおかげで-4バイト。

— TNT
ソース
1年以上経っていますが、2番目のforループを少しゴルフすることができます：for(;i<= s.length();System.out.println(s.substring(i-n,i++)));（-3バイト）
— ケビンクルーイッセン
1
改善できないという意味ではありません。:)ありがとう。
— TNT
2

Matlab、95

いつものように、それは行列の操作です。ここでのコアは、spdiags対角行列を非常に簡単に作成できるコマンドです。

t=input('');
n=numel(t);
k=input('');
flipud(char(full(spdiags(repmat(t,n+k-1,1),1-n:0,n+k-1,k))))

71バイトのハードコーディング（予想される文字列tとの数k）

n=numel(t);flipud(char(full(spdiags(repmat(t,n+k-1,1),1-n:0,n+k-1,k))))
— フレア
ソース
2

APL、50-10 = 40文字

もっと短くなると思います。50は、2つの定数を除いたプログラムの長さです。

{⍵≡⍬:⍬⋄⎕←↑⍵⋄⎕DL 99⋄∇1↓⍵}⊂[0]⊖s⍴⍨n,¯1+⍴s←'brace yourself',' '⍴⍨n←6

説明：

                               ' '⍴⍨n←6   call the number 'n' and make n spaces
            s←'brace yourself',           append them to the string and call it 's'
⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯
                             s⍴⍨n,¯1+⍴s   make a len(s)-1 by n matrix by repeating s 
                        ⊂[0]⊖             reflect the matrix and extract the columns
{                      }                  pass the list of columns to this function
 ⍵≡⍬:⍬⋄                                   return if the list is empty
       ⎕←↑⍵⋄                              print the first column (as a row)
            ⎕DL 99⋄                       wait for 99ms
                   ∇1↓⍵                   recurse with the rest of the columns

端末でngn APL用に開発されました。

— トビア
ソース
2

Powershell- 85 83バイト

遅れて、勝つつもりはありません:-)しかし、完全を期すためにPowershellを投入すると思いました。

function m($s,$n){1..$($n+$s.length)|%{-join(" "*$n+$s+" "*$n)[$_-1..$($n+$_-1)]}}

— クリス・J
ソース
1

Lua、79バイト

r=io.read;t=r()w=r()s=" "t=s:rep(w)..t;for i=1,t:len()do print(t:sub(i,i+w))end
— Blab
ソース
1

C＃、112バイト

s=>n=>{var r=new string(' ',n-1);s=r+s+r;r="";for(int i=0;i<s.Length-n+1;)r+=s.Substring(i++,n)+"\n";return r;};

ungolfedメソッドとテストケースを含む完全なプログラム：

using System;

namespace FakeMarqueeText
{
    class Program
    {
        static void Main(string[] args)
        {
            Func<string,Func<int,string>>f= s=>n=>
            {
                var r=new string(' ',n-1);
                s=r+s+r;
                r="";
                for(int i=0;i<s.Length-n+1;)
                    r+=s.Substring(i++,n)+"\n";

                return r;
            };

            // test cases:
            Console.WriteLine(f("testing")(4));
            Console.WriteLine(f("hello")(2));
            Console.WriteLine(f("foobarz")(3));
            Console.WriteLine(f("Something a bit longer")(10));
            Console.WriteLine(f("small")(15));
            Console.WriteLine(f("aaa")(3));
            Console.WriteLine(f("brace yourself")(6));

        }
    }
}
— アドリアンプ
ソース
1

PHP4.1、85-10 = 75バイト

はい、これは非常に古いバージョンですが、必要な機能があります。
PHPのより新しいバージョンでも実行できますが、以下のコードを実行する前に自分で変数を設定する必要があります。

これにより、コードのサイズを大幅に削減できます！

それは本当に基本的なものです：

<?for($s=str_repeat(' ',$n).$s;$i++<strlen($s)+$n;sleep(1))echo substr($s,$i,$n),'
';

OPを引用して、これによるボーナスを求めて走りました。

プログラムがスタンドアロンの場合（つまり、実行時に実際に行を印刷する場合）（入力はハードコーディングできますが、変更は簡単です）、出力の各行の間に少しスリープすると、-10のボーナスが得られます。

明らかなように、睡眠があります。

これは、register_globalsこのバージョンのデフォルト設定であるデフォルトで有効になっていることを前提としています。

ブラウザで簡単にテストできます。 最小限の お釣り：

//detects if it is running in js or php
//true for js, false for php
if('\0'=="\0")
{
	function strlen($s){
		return $s.length;
	}
	
	function str_repeat($s,$n){
		return Array($n+1).join($s);
	}
	
	function substr($s,$n,$m){
		return $s.substr($n,$m);
	}
	
	function printf($s){
		document.write($s);
	}
	
	function concat($a,$b){
		return $a+$b;
	}
}
else
{
	function concat($a,$b){
		return $a.$b;
	}
}

//sets the variables, not required for PHP if you pass the values by GET or POST
$i=0;
$s='example';
$n=6;



for($s=concat(str_repeat('-',$n),$s);$i++<strlen($s)+$n;)printf(concat(substr($s,$i,$n),'<br>'));
*{font-family:monospace}
スニペットを展開

上記のコードは多言語であり、ブラウザまたはPHPインタープリターで実行できます。これに対して賞品をもらえませんか？クッキー？

変更点のリスト：

  • sleep(1)このテストで削除されました
  • 関数concat
    の2つのバージョンを作成目標は、文字列の連結におけるPHPとJSの違いを克服することです。
  • スペースの代わりに、スペース-を埋めるために使用されます
  • の代わりにecho、代わりにprintf使用します（PHPの制限）
  • 代わりに、または「実際の」改行<br>が代わりに使用されます
— イスマエル・ミゲル
ソース
1

APL（Dyalog）、17バイト

⌽⍉↑(⎕,⍨' '/⍨⊢)¨⍳⎕

オンラインでお試しください！

（プログラムは⎕IO←0、多くのマシンでどちらがデフォルトであると想定しています）

説明

⍳⎕               Create a range 0 .. input-1
¨                For each element in this range do:
 ' '/⍨⊢           A space duplicated right argument (which is the element in  the range) times
 ⎕,⍨              Concatenated with the input string to its right
⌽⍉               Transpose and reflect horizontally
— クリチキシリソス
ソース
弊社のサイトを使用することにより、あなたは弊社のクッキーポリシーおよびプライバシーポリシーを読み、理解したものとみなされます。
Licensed under cc by-sa 3.0 with attribution required.