プログラミングのお題スレ Part22 (854レス)
プログラミングのお題スレ Part22 http://mevius.5ch.net/test/read.cgi/tech/1691038333/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
レス栞
13: デフォルトの名無しさん [sage] 2023/08/07(月) 20:51:54.50 ID:ZWV0+Q1Z >>3 Haskell https://ideone.com/ACKqL8 http://mevius.5ch.net/test/read.cgi/tech/1691038333/13
232: デフォルトの名無しさん [] 2024/02/11(日) 20:38:42.50 ID:v64KP9lJ >>206 >>230をDで書くと https://ideone.com/9oenyq になるが、switch case 0, 1, 2の場合も3の場合と同じ処理にすると、効率は落ちるもののかなり短くできる。 https://ideone.com/ILLUdy http://mevius.5ch.net/test/read.cgi/tech/1691038333/232
389: デフォルトの名無しさん [sage] 2024/08/03(土) 22:28:33.50 ID:Dl6/uvrz クイズと「プログラミングのお題」との決定的な違い 検証するための入力(問題)と出力(解答)例が明記されているかどうか http://mevius.5ch.net/test/read.cgi/tech/1691038333/389
450: デフォルトの名無しさん [sage] 2025/01/01(水) 12:58:01.50 ID:emEmRiID 他力本願か? http://mevius.5ch.net/test/read.cgi/tech/1691038333/450
711: デフォルトの名無しさん [] 2025/03/27(木) 21:06:27.50 ID:AGn6MWSp >>710 PowerShell function unko($n) { if ($n -ge 1) {1..$n |% {" " * ($n - $_) + "#" * (2 * $_ - 1)}} } unko 3 -- 実行結果 -- # ### ##### http://mevius.5ch.net/test/read.cgi/tech/1691038333/711
785: デフォルトの名無しさん [sage] 2025/07/30(水) 21:50:10.50 ID:Ug40aZKP >>771 java https://ideone.com/Z8Q9Dk http://mevius.5ch.net/test/read.cgi/tech/1691038333/785
800: デフォルトの名無しさん [sage] 2025/08/16(土) 13:16:59.50 ID:MUbLd8/3 >>799 Rust 愚直にn回まわし use itertools::Itertools; // for tuple_windows() fn f(init: &str, n: usize) -> String { let mut list = init.chars().rev().collect::<Vec<_>>(); for _ in 1..n { if let Some((pre_index, (_, old))) = list.iter().tuple_windows().enumerate().find(|(_, (pre, cur))| pre > cur) { let old_index = pre_index + 1; let (new_index, _) = list.iter().enumerate().find(|(_, cur)| cur > &old).unwrap(); list.swap(old_index, new_index); list[..old_index].reverse(); } } list.into_iter().rev().collect() } fn main() { assert_eq!(f("123456789", 1), "123456789"); assert_eq!(f("123456789", 2), "123456798"); assert_eq!(f("123456789", 3), "123456879"); assert_eq!(f("123456789", 123456), "416589732"); assert_eq!(f("123456789", 234567), "684753219"); assert_eq!(f("123456789", 362880), "987654321"); assert_eq!(f("111222333444", 1), "111222333444"); assert_eq!(f("111222333444", 2), "111222334344"); assert_eq!(f("111222333444", 3), "111222334434"); assert_eq!(f("111222333444", 123456), "222331434114"); assert_eq!(f("111222333444", 234567), "324424331112"); assert_eq!(f("111222333444", 369600), "444333222111"); } http://mevius.5ch.net/test/read.cgi/tech/1691038333/800
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
1.429s*