[過去ﾛｸﾞ] プログラミングのお題スレ Part20 (1002ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

103(7): 2021/08/12(木)09:29 ID:GeyAERvY(1) AAS
お題
文字列を入力として受け取って
入力された文字列と、入力された文字列を逆順にした文字列を
1文字ずつ交互に結合した文字列を出力してください

入力： abcde
出力： aebdccdbea

---

104(1): 2021/08/12(木)10:08 ID:Lpug+0Go(1) AAS
>>103 Ruby

'abcde'.size.times{$><<s[_1]<<s[~_1]} # => aebdccdbea

---

105: 2021/08/13(金)03:01 ID:pLlXEN4h(1) AAS
>>103
Haskell

import Data.List
acbbca x = concat $ transpose [ x , reverse x ]
main = do
putStrLn $ acbbca "Hello World"
putStrLn $ acbbca "たけやぶやけた"

----
HdellrlooW WoolrlledH
たたけけややぶぶややけけたた

---

107: 2021/08/13(金)11:47 ID:Zwr8vbQY(1) AAS
>>103 octave
外部ﾘﾝｸ:ideone.com
f = @(s) [s; flip(s)](:)';
f('abcde')

---

108: 96 2021/08/13(金)12:16 ID:Tqy/ucLn(1) AAS
>>103 Perl5

@b = reverse @a = split'', 'abcde';
use List::MoreUtils 'zip';
print zip @a, @b;

実行結果
~ $ perl 20_103.pl
aebdccdbea

---

109(1): 2021/08/13(金)18:31 ID:C2vgWz0X(1/2) AAS
>>103
Kotlin
外部ﾘﾝｸ:paiza.io

---

110: 2021/08/13(金)18:54 ID:C2vgWz0X(2/2) AAS
>>103
C
外部ﾘﾝｸ:paiza.io

>>109と出力が同じになるようにした。
それと、折角なので wchar で作った。

---

111: 2021/08/13(金)20:49 ID:++s/0C9b(1) AAS
>>103 J
f =: ,@(,. |.)

___ f 'abcde'
aebdccdbea

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.812s*