プログラミングのお題スレ Part22

**デフォルトの名無しさん** · 2023/08/03(木) 13:52:13.20

プログラミングのお題スレです。

【出題と回答例】
1 名前：デフォルトの名無しさん
　お題：お題本文

2 名前：デフォルトの名無しさん
　>>1 使用言語
　回答本文
　結果がある場合はそれも

【ソースコードが長くなったら】 (オンラインでコードを実行できる)
https://ideone.com/
http://codepad.org/
http://compileonline.com/
http://rextester.com/runcode
https://runnable.com/
https://code.hackerearth.com/
http://melpon.org/wandbox
https://paiza.io/

宿題は宿題スレがあるのでそちらへ。

※前スレ
プログラミングのお題スレ Part21
https://mevius.5ch.net/test/read.cgi/tech/1668333636/

9 · 2025/01/24(金) 17:38:14.24

>>464 Perl5

for (<DATA>) {
　chomp;
　print "$_ → ", (/^(A((AB)?|(?1))B)+$/g ? 'true' : 'false'), "\n";
}
__DATA__

A
B
AB
ABB
AAB
AABB
ABAABBAAABBB
ABC
AABABB

※見易くするためにインデントを全角スペースに置換してあります

実行結果
~ $ perl 22_464_AB_rec_rex.pl
→ false
A → false
B → false
AB → true
ABB → false
AAB → false
AABB → true
ABAABBAAABBB → true
ABC → false
AABABB → false

**デフォルトの名無しさん** · 2025/01/24(金) 20:04:46.59

>>485 dart
https://ideone.com/nZXS5G

>>485 rust
https://ideone.com/07rym1

9 · 2025/01/25(土) 02:52:09.44

>>492
/g のｇは不要で / でおｋだった…orz

**デフォルトの名無しさん** · 2025/01/25(土) 03:04:24.02

どんまい

**デフォルトの名無しさん** · 2025/01/25(土) 21:23:47.57

>>485 c
https://ideone.com/7DAmou
・バッファに取る版

>>485 c
https://ideone.com/irBE3p
・バッファに取らない版
・表示するだけ

**デフォルトの名無しさん** · 2025/01/26(日) 14:07:38.91

>>485
Java
https://paiza.io/projects/W5rymKHMXkZgp2ID0-tfMg

**493** · 2025/01/26(日) 15:22:46.05

>>485 dart
https://ideone.com/WtkLVE
・若干の簡略化

>>485 rust
https://ideone.com/VXyvY2
・若干の簡略化？

**デフォルトの名無しさん** · 2025/01/27(月) 00:00:51.14

>>485 java
https://ideone.com/H7Pti7

**デフォルトの名無しさん** · 2025/01/27(月) 09:16:22.69

お題
入力された文字列から重複する文字を抽出してください

T →
CG →
ATA → A
CGGA → G
ATGAT → AT
GTTGCA → GT
CCCCGGG → CG
ACTGCGAG → ACG
ATCAGAATA → AT
TGCCATGACA → TGCA

9 · 2025/01/27(月) 17:15:59.64

Perl5

for (qw{T CG ATA CGGA ATGAT GTTGCA CCCCGGG ACTGCGAG ATCAGAATA TGCCATGACA}) {
　%h = (); $h{$_}++ for split '';
　print "$_ → ", (grep{1 < $h{$_}} keys %h), "\n";
}

※見易くするためインデントを全角スペースに置換してあります

実行結果
~ $ perl 22_500_dupe_char.pl
T →
CG →
ATA → A
CGGA → G
ATGAT → TA
GTTGCA → GT
CCCCGGG → CG
ACTGCGAG → GAC
ATCAGAATA → TA
TGCCATGACA → TGAC

9 · 2025/01/27(月) 21:20:12.94

>>501 Coilotに入力して処理内容を問うてみたらちゃんと返してきてワラタ
https://copilot.microsoft.com/chats/rbPk2t5sxTRgAPM8BeSxZ

9 · 2025/01/27(月) 21:22:36.75

CopilotのURLをコピペしても他の人に内容を見せることはできなかったワ…orz

**デフォルトの名無しさん** · 2025/01/27(月) 21:24:28.42

>>500 octave
https://ideone.com/eLcVPC
function s = f(s)
[~, ia] = unique(s);
s(ia) = [];
if 1 < length(s)
[~, ia] = unique(s, 'first');
s = s(sort(ia));
end
end

>>500 ruby
https://try.ruby-lang.org/playground/#code=f+%3D+-%3Es+%7Bs.chars.tally.select+%7B1+%3C+_2%7D.keys.join%7D%0Ass+%3D+%3C%3CEOS.lines(chomp%3A+true)%0AT%0ACG%0AATA%0ACGGA%0AATGAT%0AGTTGCA%0ACCCCGGG%0AACTGCGAG%0AATCAGAATA%0ATGCCATGACA%0AEOS%0Aputs+ss.map+%7B%7Cs%7C+%22%23%7Bs%7D+-%3E+%23%7Bf.(s)%7D%22%7D&engine=cruby-3.3.0
https://ideone.com/9E5Z9a
f = ->s {s.chars.tally.select {1 < _2}.keys.join}

**デフォルトの名無しさん** · 2025/01/27(月) 21:30:57.80

>>485 lisp
https://ideone.com/Hiqt3o

>>500 lisp
https://ideone.com/eRqGSp

**デフォルトの名無しさん** · 2025/01/28(火) 21:18:03.62

>>500 dart
https://ideone.com/WZzsxb

>>500 c
https://ideone.com/1c41ME

**デフォルトの名無しさん** · 2025/01/29(水) 01:00:49.19

>>500 c++
https://ideone.com/5VRuHk

**デフォルトの名無しさん** · 2025/01/29(水) 01:49:29.44

>>500
REM 重複チェック.bat
ruby -x "%~f0"
exit

#~
#!ruby
while 1
print "> "
a=$stdin.gets.chomp.split("")
exit if a==[]
puts a.select{|e| a.count(e)>1}.uniq.join
end

**デフォルトの名無しさん** · 2025/01/29(水) 21:56:05.24

>>500 java
https://ideone.com/zIZZ1G

**デフォルトの名無しさん** · 2025/01/30(木) 21:27:24.39

お題
ソース文字列と検索文字列が入力されます
検索文字列の文字をすべて含むソース文字列の部分文字列のうち
一番短い部分文字列を出力してください

DHBICEJAFG EIC → ICE
FDGJHCBIEA EIC → CBIE
FBHDCIJGEA EIC → CIJGE
JDIBGHCEAF EIC → IBGHCE
JBCIAGDHEF EIC → CIAGDHE
EJFBCAGIHD EIC → EJFBCAGI
IADCGJFBEH EIC → IADCGJFBE
IDFHBJGAEC EIC → IDFHBJGAEC

**506** · 2025/01/30(木) 21:43:26.41

>>500 c
https://ideone.com/LLFaOP
・unsigned int m[128] = {0};を使って集計

**デフォルトの名無しさん** · 2025/01/30(木) 22:47:12.58

高速文字列解析の世界に似た問題のアルゴリズム(ウェーブレット木)が沢山ありました

**デフォルトの名無しさん** · 2025/01/31(金) 00:36:51.89

>>510 ruby
https://ideone.com/K7lxJe

**デフォルトの名無しさん** · 2025/01/31(金) 13:46:22.55

このスレでいいのかわからんのだけど
Rust勉強中なんだがメモリ安全性の恩恵を受けやすいなんかしらかのプログラムを書こうと思ってるんだがなにかいいお題はあるか？
言語処理系は大体作ってるのでそれ以外で頼む

**デフォルトの名無しさん** · 2025/01/31(金) 15:33:43.41

う～んこの嫌われムーブはあのおじさんか
このスレでは自重して欲しいな

**デフォルトの名無しさん** · 2025/01/31(金) 16:14:43.64

>>514 へのお題

次の操作ができる循環リンクリストを作成してください

・空のリストへの挿入
・冒頭の挿入
・最後に挿入
・指定された位置への挿入
・最初のノードを削除する
・最後のノードを削除する
・任意の位置からノードを削除する

**デフォルトの名無しさん** · 2025/01/31(金) 21:55:55.86

>>514
Rustはメモリのデータ競合もデータ参照競合も全てコンパイルエラーにしてくれるから間違えようがないね
他の普通の言語だと実行して問題発生に気付いて調査して頑張ってようやく競合が原因だと判明して間違えていたことがわかるから開発効率の悪さとして差が現れるけど
Rustは実行前にその種のミスのデバッグまで全て終えてしまう感じ

**デフォルトの名無しさん** · 2025/01/31(金) 22:10:00.47

普通は問題発生前に気がつく

**デフォルトの名無しさん** · 2025/01/31(金) 22:17:10.46

>>510 c
https://ideone.com/MZt32o

**デフォルトの名無しさん** · 2025/01/31(金) 22:38:00.61

>>518
グローバル変数を排他制御せずに使ってしまっていたりするミスなどよく見かけるような
一般的にも巨大なコードになったり複数人で共通認識なかったりで見逃しミスは必ず出てくる
そしてタイミング次第によって稀にバグが起こるパターンとか負荷が高くなって起きてバグ発覚とか

**デフォルトの名無しさん** · 2025/01/31(金) 23:44:08.10

全て自分で出来る気付くミスらない
って自己過信な人がセキュリティホールを招いてるからね
自動的にサポートしてくれる言語を使うのが安全で開発効率もいいよ

**デフォルトの名無しさん** · 2025/02/01(土) 00:00:30.73

ちゃんとルールを守って運転すれば
事故も起きないし､違反で捕まらない
それと同じ

**デフォルトの名無しさん** · 2025/02/01(土) 00:26:30.15

>>517
せっかくだからRustで>>516やってきなよ

**519** · 2025/02/01(土) 17:22:30.12

>>510 c
https://ideone.com/tdT1q2
・若干の高速化
　部分文字列を一文字ずつズラして検証していたのを
n = strcspnで探してn文字スキップへ

**デフォルトの名無しさん** · 2025/02/01(土) 22:42:58.39

>>516
横からだがその仕様ならベクタをリングバッファとして使った両端キューで十分だな
多くの実用例でもこの方が速いことが知られている

use std::collections::VecDeque;
// 空のキュー
let mut deque: VecDeque<T> = VecDeque::new();
// 先頭に挿入
deque.push_front(t);
// 最後に挿入
deque.push_back(t);
// 指定位置に挿入
deque.insert(index, t);
// 先頭を削除して得る
let first: Option<T> = deque.pop_front();
// 最後を削除して得る
let last: Option<T> = deque.pop_back();
// 指定位置を削除して得る
let element: Option<T> = deque.pop_back();

**デフォルトの名無しさん** · 2025/02/01(土) 22:57:16.48

ズルしてどうするんよ…

**デフォルトの名無しさん** · 2025/02/01(土) 23:00:12.86

Rustのメモリ安全性を確認するためにプログラム書きたいんでしょ、だったら循環リストをフルスクラッチするしかないよね

**デフォルトの名無しさん** · 2025/02/02(日) 19:41:14.89

リンクリストならindex番目の操作(挿入or切除)は
index番目で分解して操作して合体するだけなのでこれで動くよ

use std::collections::LinkedList;

trait LinkedListExt<T> {
fn insert_at(&mut self, index: usize, value: T);
fn remove_at(&mut self, index: usize) -> Option<T>;
}

impl<T> LinkedListExt<T> for LinkedList<T> {
fn insert_at(&mut self, index: usize, value: T) {
let mut tail = self.split_off(index);
self.push_back(value);
self.append(&mut tail);
}
fn remove_at(&mut self, index: usize) -> Option<T> {
let mut tail = self.split_off(index);
let value = tail.pop_front();
self.append(&mut tail);
value
}
}

**デフォルトの名無しさん** · 2025/02/03(月) 21:15:02.53

>>510
R
https://ideone.com/0Hr1lU

C++ (>>524と同じ巨大文字列での繰り返しあり)
https://ideone.com/7fJXjB

**デフォルトの名無しさん** · 2025/02/03(月) 22:57:52.37

>>510 c
https://ideone.com/L4xIAy
・f_529 は529さんのパクり
・f_strcspn_chr は strchr してから strcspn すると単純ながら若干の速度向上

**530** · 2025/02/04(火) 21:13:55.63

>>510 c
https://ideone.com/Mar3S7
・f_529direct は出現位置集めるのやめた
　*min = strchr(*min + 1, **min)) でそのまま次へ

**531** · 2025/02/05(水) 20:39:11.49

>>510 c
https://ideone.com/jeAf1a
・デバッグと若干の整理

**532** · 2025/02/05(水) 23:28:39.35

>>510 java
https://ideone.com/EdHfzN

**デフォルトの名無しさん** · 2025/02/06(木) 22:16:32.16

>>510
C++
https://ideone.com/ywT3qw

>>529からの変更点
・sへのtの文字の出現位置を高速取得（1バイト文字のみに対応）
・sにtの同一文字が3回以上連続して出現する場合に最初と最後以外の位置を省略

**デフォルトの名無しさん** · 2025/02/07(金) 19:14:17.64

>>500
Wolfram Language

str = "ATGAT"
>> Out[1]= ATGAT

duplicates = str // Characters \
(* { A, T, G, A, T } *) \
// Counts \
(* <| A -> 2, T -> 2, G -> 1 |> *) \
// Select[Function[ 1 < # ]] \
(* <| A -> 2, T -> 2 |> *) \
// Keys \
(* { A, T } *) \
// StringJoin (* "AT" *)
>> Out[2]= AT

**デフォルトの名無しさん** · 2025/02/07(金) 21:12:13.92

テス

9 · 2025/02/07(金) 21:20:22.98

>510 Perl5

https://ideone.com/lceN9R

**デフォルトの名無しさん** · 2025/02/07(金) 22:53:14.41

>>510 c
https://ideone.com/uYlPLX
・f_537 は537さんのパクリ

9 · 2025/02/07(金) 23:00:25.46

>>537
しくった、これ一番短い範囲ではなく間違って一番長い範囲を検出してる。
サンプルデータではたまたま同じ解になるようで、間違いを見落としてしまった。

それから、一番長い（短いにすべきだったが）範囲の検索にわざわざ候補listをsortして[0]番目を
取得しているが無駄だし規模が大きくなると効率よくない

時間あったら直しますわ～

9 · 2025/02/07(金) 23:02:20.43

>>538
あーでも527の方式がいまんとこ一番早いんだな、検証ｔｈｘ

9 · 2025/02/07(金) 23:04:01.40

>>540 527 じゃなくて 537ね。ｽﾏｿ

**538** · 2025/02/07(金) 23:08:45.80

>>540
>>537さん方式は動的にメモリとらなくていいのがいいよね、清々しくていいよね
あと実行時間の値はまぁアテにはならんので参考程度にｗ

**デフォルトの名無しさん** · 2025/02/07(金) 23:41:05.56

>>500
PowerShell

"T", "CG", "ATA", "CGGA", "ATGAT", "GTTGCA", "CCCCGGG", "ACTGCGAG ", "ATCAGAATA", "TGCCATGACA" |% {
　　"$_ → $(-join ([char[]]$_ | group -case |% {$_.name[$_.count -le 1]}))"
}

[実行結果]
T →
CG →
ATA → A
CGGA → G
ATGAT → AT
GTTGCA → GT
CCCCGGG → CG
ACTGCGAG → ACG
ATCAGAATA → AT
TGCCATGACA → TGCA

9 · 2025/02/08(土) 00:22:55.52

>>510 Perl5、>>537 の修正版

https://ideone.com/klqLux

修正点
・>>537では間違って一番長い範囲を検出していたが、一番短い範囲に修正した。（サンプルデータではそれらの解はたまたま一致）
・パターンが3文字であることに依存する定数「2(=3 -1 )」をハードコードしている箇所があったので、パターン文字数次第で処理するように修正
・検出した候補文字列リストのうち一番短い物の検索のためにわざわざ候補リスト全体をsortするのをやめて
　reduceによって長さが一番短い文字列を検索するように修正

List::Utils は言語処理系にデフォルトで付属のコアモジュール、
List::MoreUtils はCPANのオプションノジュールだがideoneのperlにはｲﾝｽｺされていたので使っちゃいましたﾃﾍﾍﾟﾛ

なお、候補文字列リストを作らず、ループの最内ifの中で一番短い文字列だけを記録していく様に記述すれば
大規模問題で若干効率が良くなるだろうけど、
まあいいや、もういいや。

9 · 2025/02/08(土) 00:26:07.95

>>544 List::Utils → List::Util ね。ｽﾏｿ

**デフォルトの名無しさん** · 2025/02/08(土) 08:27:20.39

>>510
Wolfram Language

s = "DHBICEJAFG"
>> Out[1]= DHBICEJAFG
pattern = "EIC"
>> Out[2]= EIC

shortestMatch = \
(* 全通りの部分文字列を生成する *) \
ReplaceList[ Characters[ s ], {___, x__, ___} -> {x} ] \
(* 短い順、先頭に近い順に並べる *) \
// Sort \
(* 検索文字列の文字を全て含むものを選ぶ *) \
// Select[ ContainAll[ Characters[ pattern ] ] ] \
(* 1つ目を文字列として返す *) \
// Extract[ 1 ] // StringJoin
>> Out[3]= ICE

9 · 2025/02/08(土) 17:50:15.20

>>510 Perl5、>>544 をもう一回だけ改良

https://ideone.com/YkuK1w

改良点：
・検出された範囲の候補を一通りリストに蓄えて、あとでその中から最短のものを探す方式を止めて、
　範囲を検索するループ内のifでその時点までの最短な範囲の判定と記録を行うようにした。
・CPANモジュールList::MoreUtilsのminmaxを使わない。
・コアモジュールList::Utilはminだけ使う。reduceは使わない。

なんだかPerlのコードらしい感じが減って、ベタな感じのコードになってしまいました

**デフォルトの名無しさん** · 2025/02/08(土) 19:59:09.70

>>510
C++
https://ideone.com/7EHx0H

>>534からの変更点
・minmax_elementを呼び出さずに済むようにして高速化

**デフォルトの名無しさん** · 2025/02/08(土) 20:02:06.41

>>510
C++
https://ideone.com/TluWQi

>>548では検索文字列が短くて高速化されたか分かりにくかったので、長くして529, 534, 548の
実行時間を比較してみると、効果が顕著に現れた。

警備員[Lv.19] · 2025/02/09(日) 03:18:28.07

>>485
Kotlin
https://paiza.io/projects/RtyGxT2PXZScHW6eucI5ng

警備員[Lv.19] · 2025/02/09(日) 03:56:54.57

>>500
Kotlin
https://paiza.io/projects/eipNjg4meAtA7__e3JTRdg

**デフォルトの名無しさん** · 2025/02/09(日) 12:47:59.38

>>510 c
https://ideone.com/D2AZMK
・両端に着目し、両端のみを更新しつつ調べていく（が、これといってパっとせず）
・f_both_ends はあくまで元の文字列s上を調べていく
・f_both_ends_v2 は「次」「隣」にアクセスしやすくした構造の上を調べていく
・あと実行時間の値ははげしくブレブレなので参考程度にとどめておいてね

**デフォルトの名無しさん** · 2025/02/09(日) 21:29:55.65

>>485
R
https://ideone.com/wuW5oV

**デフォルトの名無しさん** · 2025/02/09(日) 21:31:24.58

>>510
C++
https://ideone.com/bwvs06

>>548からの変更点
・データ構造を単純化したら速くなった

**デフォルトの名無しさん** · 2025/02/09(日) 21:35:08.87

>>510
https://ideone.com/46Tb28
>>549の実行速度比較に554を追加。548は不要な2行を削除した。検索文字列が短いのと長いのの両方をテスト。

警備員[Lv.19] · 2025/02/10(月) 13:21:24.86

>>510
Kotlin

出来たことは出来たが、もっと簡単に出来そうな気がしてきた。

https://paiza.io/projects/RwNXYMH6q3P6v0vx9zbZng

**デフォルトの名無しさん** · 2025/02/10(月) 21:24:31.20

>>485
C# (IEnumerableとして列挙)
https://ideone.com/UBY8bl

**デフォルトの名無しさん** · 2025/02/11(火) 03:27:04.16

動画再生回数、登録者数、評価数、コメント数

上2桁、下2桁に04、13、40、44、71、74など
（＋生年月日、IDの数字など）の組み合わせ

業者による忌み数字、不吉数字の嫌がらせ&精神攻撃がキモすぎ

警備員[Lv.20] · 2025/02/11(火) 05:48:25.27

それはお題なのか？それともただの誤爆か？

**デフォルトの名無しさん** · 2025/02/11(火) 06:03:36.08

糖質でしょ
忌み数字不吉数字とか意味不明なこと言ってるし，それを業者が特定個人を狙って表示する意味も分からんし

**デフォルトの名無しさん** · 2025/02/11(火) 10:54:21.93

お題
数列が入力されます
ニ番目に小さい数を出力してください

入力：4, 5, 1, 7, 1, 2, 8, 9, 2, 7
出力：2

**デフォルトの名無しさん** · 2025/02/11(火) 11:46:37.94

こんちゃ
質問いいでしょうけ
プルダウン（ポップアップ）をUIとしてだすとして
見えている項目名と、実際にパラミータとして出す値を変えたい時はどうしたらよか

9 · 2025/02/11(火) 14:53:15.78

>>561 Perl5

$h{$_} = $_ for 4, 5, 1, 7, 1, 2, 8, 9, 2, 7;
@s = sort keys %h;
print "$s[1]\n";

実行結果
~ $ perl 22_561_second.pl
2

Perl5.26以降に付属のList::Utilにはuniq関数があるのでそれを使えば:

use List::Util qw(uniq);
@s = uniq sort 4, 5, 1, 7, 1, 2, 8, 9, 2, 7;
print "$s[1]\n";

警備員[Lv.20] · 2025/02/11(火) 16:33:48.19

>>562
環境や言語やフレームワークを書いて限定しないと色々な環境や言語やフレームワークでの答えが適当に沢山湧いて出て来る可能性あるぞ。
しかも分からない所は適当に解釈してだ。なぜならここはお題スレだから。

**デフォルトの名無しさん** · 2025/02/11(火) 16:37:12.05

>>561 ruby
https://ideone.com/OI7hWs

>>561 octave
https://ideone.com/36aKUO

>>561 c
https://ideone.com/eDmlMM

**デフォルトの名無しさん** · 2025/02/11(火) 16:40:21.13

>>561
#!ruby
puts $stdin.gets.chomp.split(",").map{|e| e.to_i}.uniq.sort[1]

**デフォルトの名無しさん** · 2025/02/11(火) 17:43:14.68

>>510 lisp
https://ideone.com/qm4PsV

**デフォルトの名無しさん** · 2025/02/11(火) 17:48:30.95

>>561 lisp
https://ideone.com/g6m1EK

**デフォルトの名無しさん** · 2025/02/11(火) 18:19:05.70

>>568
全然だめでした
取りあえずテスト追加済

**デフォルトの名無しさん** · 2025/02/11(火) 20:45:09.89

>>561
R
https://ideone.com/3beF1j

C++
https://ideone.com/A8hp2f

それぞれ3通りの方法で、大きなデータでの実行時間を比較

**デフォルトの名無しさん** · 2025/02/11(火) 23:21:03.54

数列が入力されるので
整数の数列だけでなく浮動小数点数の数列にも対応してくださいね

ニ番目に小さい数がない時
例えば同じ数しか存在しない時や数列の長さが1の時には
解がないことを返してくださいね
例えばその時にMAX値が返ってきたら失格ですよ

**565** · 2025/02/11(火) 23:28:05.14

>>561 ocaml
https://ideone.com/aV59Yd

>>561 java
https://ideone.com/PdgusX

9 · 2025/02/11(火) 23:36:31.53

先に言えよって、感じｗ

**デフォルトの名無しさん** · 2025/02/11(火) 23:48:25.56

>>571は出題者ではないよ
出題者として申し上げるなら>>571は観点がダサい

**デフォルトの名無しさん** · 2025/02/11(火) 23:50:12.69

小数対応はともかく
max値を返してしまう人はプログラマ失格かな
あとsortを使ってしまう人は計算量を知らない初心者

**デフォルトの名無しさん** · 2025/02/11(火) 23:53:59.73

そういうこだわりはアスペルガーにしか思えないな、どうでも良いじゃないですかそんなこと

**デフォルトの名無しさん** · 2025/02/11(火) 23:56:29.96

こだわりは自分の胸のうちに留めていただきたい、他人に求めたら回答の幅を狭めるだけ、多様性のある回答こそ美しい

**デフォルトの名無しさん** · 2025/02/11(火) 23:57:23.71

>>576
多くの人はちゃんとnilとかemptyとかNoneなどを返しているよね
プログラマならそこだけは守らなければならない必須事項

**デフォルトの名無しさん** · 2025/02/11(火) 23:59:56.87

だからそういう、こうじゃないとダメだという態度がアスペルガー仕草なんだってばよ、君が思うのは勝手だが他人に求めるものじゃない

**デフォルトの名無しさん** · 2025/02/12(水) 00:01:10.34

プログラミングはもっと自由なものなんだよ、思ったとおりにかけば良い

9 · 2025/02/12(水) 00:03:23.15

そういう条件は回答を見て思いついた後から言わず先に書くべきでは？
そうでなければ、与えられた短い文とテストデータから、
処理対象データの範囲や要求仕様を読み手が色々解釈しても仕方ないだろ。
後からいろいろ言って批判なんてでもってのほかだと思うが。

9 · 2025/02/12(水) 00:05:30.21

出来たもの見て実はこういう条件がありましたってケチつけるのはクソクライアントと一緒だな

**デフォルトの名無しさん** · 2025/02/12(水) 00:13:52.34

ざっと見たけどmax()を返してるのはC++の人だけで他は皆まともだ
普段からまともなコード書いてるかどうかバレてしまうから自由が面白い

**デフォルトの名無しさん** · 2025/02/12(水) 00:18:10.68

好きにしたら良いんやで吉田松陰もそんなこと言ってた気がする

**デフォルトの名無しさん** · 2025/02/12(水) 00:20:24.72

まともとかバレるとかそういう当て擦りの嫌味ったらしい言い方どこで身につけてきたのあんた、母ちゃんは悲しいよ

**デフォルトの名無しさん** · 2025/02/12(水) 00:22:24.96

>>583
関数がINT_MAXを返すのはまともなコードだろ。2番目に小さい数はINT_MAXではありえないから、
返り値がINT_MAXの場合は「なし」と表示すれば良いだけ。

9 · 2025/02/12(水) 00:28:30.94

「データが二個未満の場合にはnilを返す。」とか書いとくべき。
でもそういう細かい条件をちまちま指定した窮屈な課題は、つまんなくて回答を造る意欲が減るんだよな。

シンプルで純な課題に対してどういうエレガントでエッセンシャルな回答があるか考えるのが楽しいのであって、
細かいいろんな条件を守る周辺コードで固めるような作業はつまんないから趣味の世界ではやりたくないな

**デフォルトの名無しさん** · 2025/02/12(水) 00:31:16.47

普段はプログラム載せるだけだけど、みんな意外と饒舌なんだなw

9 · 2025/02/12(水) 00:33:57.88

ここはある意味、回答のｺｰﾄﾞでもって語るスレだからな

**デフォルトの名無しさん** · 2025/02/12(水) 00:35:35.77

お題にそんな指定ないのに
みんなnilなどを返してるからこのスレの住人たちはセンスいいな

**デフォルトの名無しさん** · 2025/02/12(水) 19:12:16.26

>>561 lisp (sbcl)
https://ideone.com/Bct7bC

>>561 lisp (clisp)
https://ideone.com/yqfmzh

clispだと何故かsort版の方が速い

**デフォルトの名無しさん** · 2025/02/12(水) 20:45:54.96

>>561 ruby
https://ideone.com/svMSSw

>>561 sqlite
https://ideone.com/W02Q5r