プログラミングのお題スレ Part22 (860レス)
プログラミングのお題スレ Part22 http://mevius.5ch.net/test/read.cgi/tech/1691038333/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
レス栞
リロード規制
です。10分ほどで解除するので、
他のブラウザ
へ避難してください。
101: デフォルトの名無しさん [sage] 2023/09/28(木) 08:18:15.29 ID:q8VwFY1b お題 文字列S=abcdefghij(10文字)が与えられて 配列[0,4,7]が与えられる このときSの0番目を4番目、4番目を7番目、7番目を0番目に移動した文字列を出力するプログラムを書いてください http://mevius.5ch.net/test/read.cgi/tech/1691038333/101
102: デフォルトの名無しさん [] 2023/09/28(木) 09:17:20.57 ID:iiudb0JA >>101 lisp https://www.ideone.com/pOwDJd http://mevius.5ch.net/test/read.cgi/tech/1691038333/102
103: デフォルトの名無しさん [sage] 2023/09/28(木) 13:09:43.08 ID:tckV2TlV >>101 Ruby 文字列S='abcdefghij' 配列=[0,4,7] 文字列 = 文字列S.dup 配列.zip( 配列.rotate ).each{|i,j| 文字列[i] = 文字列S[j] } puts 文字列 http://mevius.5ch.net/test/read.cgi/tech/1691038333/103
115: 17 [] 2023/10/02(月) 01:36:39.53 ID:hWT/DRlk >>101 Kotlin https://paiza.io/projects/95GuXcUyZr8AkmVsRESj5Q http://mevius.5ch.net/test/read.cgi/tech/1691038333/115
146: デフォルトの名無しさん [sage] 2023/10/28(土) 20:54:22.44 ID:U0JINWpQ >>101 octave https://ideone.com/87WGBO function s = f(s, i) s(circshift(i, -1, 2)) = s(i); end >>127 ocaml https://ideone.com/IY1dWU let chars s = let rec aux acc i = if i < 0 then acc else aux (s.[i] :: acc) (i - 1) in aux [] ((String.length s) - 1) let f s = let rec aux = function ([], []) -> 1 | (_, []) -> 0 | ('['::bs, ']'::cs) -> aux (bs, cs) | (bs, c::cs) -> aux (c::bs, cs) in aux ([], (chars s)) http://mevius.5ch.net/test/read.cgi/tech/1691038333/146
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.035s