プログラミングのお題スレ Part22 (854ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞
ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡
129: 17 [] 2023/10/14(土) 04:16:14.71 ID:BgrcFKKf(2/2) AAS
>>111111(5): デフォルトの名無しさん [] 2023/09/30(土) 17:32:44.04 ID:xxjzuZuq(1) AAS
お題
文字列が入力されます
赤と緑を入れ替えて
黒と白を入れ替えて
黄と青を入れ替えてください
例
入力: 緑のカバンに500万入れて白の紙で黄色のカバン言うて書きながら赤のカバン言いながら置いてくれたら俺黒のカバン言いながら取りに行くわ
出力: 赤のカバンに500万入れて黒の紙で青色のカバン言うて書きながら緑のカバン言いながら置いてくれたら俺白のカバン言いながら取りに行くわ
Kotlin
外部ﾘﾝｸ:paiza.io
153(1): デフォルトの名無しさん [sage] 2023/11/11(土) 20:39:33.71 ID:iU/7lT3J(1/2) AAS
>>8585(5): デフォルトの名無しさん [sage] 2023/09/20(水) 14:42:58.26 ID:I55f6i4N(1/2) AAS
お題
abc1.mp4 abc2.mp4 .. abc20.mp4があるとします
これを名前順でソートできるようにするため
abc001.mp4 abc002.mp4 ... abc020.mp4
とリネームしてください
Ruby で作った。
FileUtils::DryRun を使っているので、実際には変更されません
require 'fileutils'
HEAD = 'abc' # 先頭文字
EXT = '.mp4' # 末尾の拡張子
HEAD_LEN = HEAD.length # 3文字
EXT_LEN = EXT.length # 4文字
# 絶対パスのディレクトリ名の後ろに、* を付けること！
# . で始まる、隠し directory, file を除く
glob_pattern = "C:/Users/Owner/Documents/test/*#{ EXT }"
target_dir = File.dirname( glob_pattern ) # ディレクトリパスだけを取り出す
# 元のファイル名の配列
fname_src_ary = Dir.glob( glob_pattern )
.select { |full_path| File.file?( full_path ) } # ファイルのみ
.select do |full_path|
file_name = File.basename( full_path )
# 先頭文字が abc かつ、末尾が .mp4 だけに絞り込む
file_name.start_with?( HEAD ) && file_name.end_with?( EXT )
end
.map { |full_path| File.basename( full_path ) }
次へ続く
361: デフォルトの名無しさん [sage] 2024/06/07(金) 23:28:58.71 ID:KMptjexu(1) AAS
TA = [ * ?\x20 .. ?\x7E ]
TS = TA.join
def caesar( s, n ) s.tr( TS, TA.rotate( n ).join ) end
s = "Hello, World!"
p caesar( s, 0 ) #=> "Hello, World!"
p caesar( s, 1 ) #=> "Ifmmp-!Xpsme\""
p caesar( s, -1 ) #=> "Gdkkn+~Vnqkc "
p caesar( s, 20240607 ) #=> "Jgnnq.\"Yqtnf#"
p caesar( caesar( s, 20240607 ), -20240607 ) #=> "Hello, World!"
p caesar( 'HAL9000', 1 ) #=> "IBM:111"
578: デフォルトの名無しさん [sage] 2025/02/11(火) 23:57:23.71 ID:HwVbkmdb(2/2) AAS
>>576多くの人はちゃんとnilとかemptyとかNoneなどを返しているよね
プログラマならそこだけは守らなければならない必須事項
636: デフォルトの名無しさん [sage] 2025/02/16(日) 08:20:29.71 ID:eNZyrnPC(1) AAS
そんなことより>>616616(2): 9 [sage] 2025/02/15(土) 10:36:35.12 ID:1WENuqRv(1/2) AAS
>>608 Perl5、肯定先読みと置換の小文字変換
s/([A-Z])(?=\1)/\1\l\1/g, print for <DATA>;
__DATA__
abcDDefGG
abcDDDefGGG
実行結果
C:\Home>perl 22_608_ins_l.pl
abcDdDefGgG
abcDdDdDefGgGgG
のワンライナーがカッコよくてほれぼれする
710(2): デフォルトの名無しさん [sage] 2025/03/27(木) 20:35:59.71 ID:cvPlHeM5(1) AAS
お題：＃（シャープ）を入力の段数でウンコ状に並べて出力せよ
出力は全角でも半角でもどちらでもよしとする（5ch は半角スペース表示できない）
in < 3
out >
＃
＃＃＃
＃＃＃＃＃
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.049s