プログラミングのお題スレ Part22 (859ﾚｽ)
プログラミングのお題スレ Part22 http://mevius.5ch.net/test/read.cgi/tech/1691038333/
上
下
前次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
抽出解除
ﾚｽ栞
ﾘﾛｰﾄﾞ規制
です｡10分ほどで解除するので､
他のﾌﾞﾗｳｻﾞ
へ避難してください｡
474: デフォルトの名無しさん [] 2025/01/04(土) 21:19:41.74 ID:uiECOsgP お題 貨幣・銀行券を次の文字列で表すとします (1) (5) (10) (50) (100) (500) [1000] [5000] [10000] 貨幣・銀行券がランダムに次のような文字列で与えられます (100)(10)(1)[10000](5)(500)[1000][5000][1000][1000](10)(100)(50)(100)[1000] 与えられた貨幣・銀行券を分類して貨幣・銀行券の価値が高い順に次のように出力するプログラムを作成してください [10000] [5000] [1000][1000][1000][1000] (500) (100)(100)(100) (50) (10)(10) (5) (1) http://mevius.5ch.net/test/read.cgi/tech/1691038333/474
475: デフォルトの名無しさん [sage] 2025/01/04(土) 22:52:21.99 ID:frbzLXtQ >>474 c https://ideone.com/TBzq6C http://mevius.5ch.net/test/read.cgi/tech/1691038333/475
477: デフォルトの名無しさん [sage] 2025/01/05(日) 21:35:39.46 ID:6Z+55hA8 >>474 ruby https://ideone.com/6bso7P http://mevius.5ch.net/test/read.cgi/tech/1691038333/477
479: 警備員[Lv.18] [] 2025/01/12(日) 04:47:49.98 ID:zWON4EbF >>474 Kotlin https://paiza.io/projects/rM9KpHluaNW1E3bsLY2k6A http://mevius.5ch.net/test/read.cgi/tech/1691038333/479
483: 9 [sage] 2025/01/20(月) 01:11:38.35 ID:zWVP8H/r >>474 Perl5 $s = '(100)(10)(1)[10000](5)(500)[1000][5000][1000][1000](10)(100)(50)(100)[1000]'; $h{$_} .= $_ for $s =~ /\(\d+\)|\[\d+\]/g; use List::Util 'sum'; $v{$h{$_}} = sum($h{$_} =~ /\d+/g) for keys %h; print "$_\n" for sort{$v{$b} <=> $v{$a}} keys %v; 実行結果 ~ $ perl 22_474_value.pl [10000] [5000] [1000][1000][1000][1000] (500) (100)(100)(100) (50) (10)(10) (5) (1) http://mevius.5ch.net/test/read.cgi/tech/1691038333/483
ﾒﾓ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.043s