0から141までの整数（両端を含む）を指定すると、その整数に時、分、秒の単位が加算される24時間すべてをリストします。

追加の規則

数字は、1桁ではなく、時間単位で追加されます。

たとえば、17：43：59を取る

17 + 43 + 59 = 119

覚えておいてください、それは追加される数字の例です。実際には、119を入力すると、17：43：59が結果の1つになります。出力は、HH：MM：SSまたはH：MM：SSとして指定する必要があります。

また、可能な最大数は141で、23：59：59です。これはコードゴルフなので、最低額が勝ちます。試行錯誤は許されますが、これについてはもっと良い方法があるかもしれません。

編集：コード内の入力値の場所を指定してください。

ゼリー、16 30 29 20バイト

正しい出力形式で！この回答のデバッグに協力してくれたデニスに感謝します。ゴルフの提案を歓迎します。オンラインでお試しください！

編集：正しい出力形式を使用して+14バイト。余分なスペースを削除して-1バイト。-3から変化から24,60,60の“ð<<‘。から-6バイトへの変更+100DḊ€€からd⁵。

“ð<<‘Œp’S=¥Ðfd⁵j€”:Y

説明

“ð<<‘Œp’S=¥Ðfd⁵j€”:Y  Main link. Argument: n

“ð<<‘                 Jelly ord() the string `ð<<` to get [24, 60, 60]. Call this list z.
     Œp               Cartesian product of z's items. 
                        Since each item of z is a literal,
                        Jelly takes the range [1 ... item] for each item.
       ’              Decrements every number in the Cartesian product 
                        to get lowered ranges [0 ... item-1].
        S=¥           Create a dyadic link of `sum is equal to (implicit n)`.
           Ðf         Filter the Cartesian product for items with sum equal to n.
             d⁵       By taking divmod 10 of every number in each item,
                        we get zero padding for single-digit numbers
                        and every double-digit number just turns into a list of its digits.
               j€”:   Join every number with a ':'.
                   Y  Join all of the times with linefeeds for easier reading.

バッシュ、71

• @hvdのおかげで8バイト節約

for t in {0..23}+{00..59}+{00..59};{((${t//+0/+}-$1))||echo ${t//+/:};}

オンラインでお試しください。

Perl 6の、62の 56バイト

{map *.fmt('%02d',':'),grep $_==*.sum,(^24 X ^60 X ^60)}

すべての時間、分、秒の外積で可能なすべての組み合わせをチェックするだけです。

Python 3、91バイト

def f(n):
 for k in range(86400):t=k//3600,k//60%60,k%60;sum(t)==n!=print('%d:%02d:%02d'%t)

を使用してより短いソリューションがあります exec（Python 2）または再帰（Python 3）、両方とも不合理な量のメモリを必要とします。

オンラインでお試しください！

PowerShell、87 77バイト

John L. Bevanのおかげで10バイト節約

$d=date;0..86399|%{$d+=1e7l;"$d".Split()[1]}|?{("{0:H+m+s}"-f$d|iex)-in$args}

オンラインでお試しください！（これはタイムアウトになります、非常に遅いです）

説明

現在のから始めて、[datetime]86,399回1秒を追加し、文字列としてフォーマットし、合計が加算されたものだけを保持します。

Haskell、77バイト

f x=[tail$(':':).tail.show.(+100)=<<t|t<-mapM(\x->[0..x])[23,59,59],sum t==x]

Haskell、90バイト

p x=['0'|x<10]++show x
i=[0..59]
f x=[p h++':':p m++':':p s|h<-[0..23],m<-i,s<-i,h+m+s==x]

HH：MM：SS文字列のリストを返します。例えば f 140 ->["22:59:59","23:58:59","23:59:58"]。

時間、分、秒の3つの単純なループです。合計が入力数であるすべての値を保持およびフォーマットしますx。

Pyth-30バイト

可能な限りすべての時間をかけてからフィルターします。

mj\:%L"%02d"dfqsTQsM*U24*KU60K

テストスイート。

ジュリア 0.5、69バイト

!n=[h+m+s==n&&@printf("%d:%02d:%02d
",h,m,s)for s=0:59,m=0:59,h=0:23]

オンラインでお試しください！

バッチ、168バイト

@for /l %%t in (0,1,86399)do @call:c %1 %%t
@exit/b
:c
@set/ah=%2/3600,m=%2/60%%60,s=%2%%60,n=%1-h-m-s
@set m=0%m%
@set s=0%s%
@if %n%==0 echo %h%:%m:~-2%:%s:~-2%

1桁の時間を出力します。

Mathematica、79バイト

Cases[Tuples@{(r=Range)@24-1,x=r@60-1,x},t_/;Tr@t==#:>DateString@TimeObject@t]&

オクターブ、83、87のバイト

@(a){[H,M,S]=ndgrid(0:23,s=0:59,s);printf("%d:%02d:%02d\n",[H(x=H+M+S==a),M(x),S(x)]')}

オンラインでお試しください！

QBIC、82 72バイト

:[0,23|[0,59|[0,59|~b+c+d=a|?!b$+@:`+right$(@0`+!c$,2)+A+right$(B+!d$,2)

これは、数字へのキャスト、トリミング、および先頭への追加など、QBasicの不幸な点にぶつかります 0ます。必要に応じは非常にコストがかかります。

サンプル出力：

Command line: 119
1:59:59
2:58:59
2:59:58
3:57:59
[... SNIP 270 lines ...]
23:58:38
23:59:37

説明私はそれについて小説を書きました：

:           Get N, call it 'a'
[0,23|      Loop through the hours; this FOR loop is initialised with 2 parameters
            using a comma to separate FROM and TO, and a '|' to delimit the argument list
[0,59|      Same for the minutes
[0,59|      And the seconds
            QBIC automatically creates variables to use as loop-counters: 
            b, c, d (a was already taken by ':')
~b+c+d=a    IF a == b+c+d
|           THEN
 ?          PRINT
  !         CAST
   b        'b'
    $       To String; casting num to str in QBasic adds a space, this is trimmed in QBIC
+@:`        Create string A$, containing ":"
+right$      This is a QBasic function, but since it's all lowercase (and '$' is 
            not a function in QBIC) it remains unaltered in the resulting QBasic.
(@0`+!c$,2) Pad the minutes by prepending a 0, then taking the rightmost 2 characters.
+A          Remember that semicolon in A$? Add it again
+right$     Same for the seconds
(B+!d$,2)   Reusing the 0-string saves 2 bytes :-)

PowerShell、67 79バイト（厄介なバージョン）

ルールは特定の時間内に（またはまったく）完了することについて何も述べておらず、重複がないことについても何も述べていないので、ここに恐ろしい解決策があります。

for(){if(("{0:H+m+s}"-f($d=date)|iex)-in$args){"{0:H:mm:ss}"-f$d}}

ラケット39バイト

(for*/sum((h 24)(m 60)(s 60))(+ h m s))

ゴルフをしていない：

(for*/sum      ; loop for all combinations; return sum of values for each loop
   ((h 24)     ; h from 0 to 23
    (m 60)     ; m from 0 to 59
    (s 60))    ; s from 0 to 59
  (+ h m s))   ; sum of all 3 variables

MATL、29バイト

24:q60:qt&Z*t!si=Y)'%i:'8:)&V

オンラインでお試しください！

説明

24:q     % Push [0 1 ... 23]
60:q     % Push [0 1 ... 59]
t        % Duplicate
&Z*      % Cartesian product of the three arrays. This gives a matrix with each
         % on a different row Cartesian tuple
t!       % Push a transposed copy
s        % Sum of each column
i=       % Logical mask of values that equal the input
Y)       % Select rows based on that mask
'%i:'    % Push this string
8:)      % Index (modularly) with [1 2 ... 8]: gives string '%i:%i:%i'
&V       % Convert to string with that format specification. Implicitly display

JavaScript、 122 120バイト

入力として追加の空の文字列を1つ受け取り、 私はサイズにカウントされないと思います。文字列の初期化に2バイトを追加するために、バイトカウント（履歴を含む）を更新しました。

console.log((
//Submission starts at the next line
i=>o=>{for(h=24;h--;)for(m=60;m--;)for(s=60;s--;)if(h+m+s==i)o+=`${h}:0${m}:0${s} `;return o.replace(/0\d{2}/g,d=>+d)}
//End submission
)(prompt("Number:",""))(""))

JavaScript（ES6）、110

v=>eval("o=[];z=x=>':'+`0${x}`.slice(-2);for(m=60;m--;)for(s=60;s--;h>=0&h<24&&o.push(h+z(m)+z(s)))h=v-m-s;o")

少ないゴルフ

v=>{
  o=[];
  z=x=>':' + `0${x}`.slice(-2);
  for(m = 60; m--;)
    for(s = 60; s--; )
      h = v - m - s,
      h >= 0 & h < 24 && o.push(h + z(m) + z(s))
  return o
}

テスト

F=
v=>eval("o=[];z=x=>':'+`0${x}`.slice(-2);for(m=60;m--;)for(s=60;s--;h>=0&h<24&&o.push(h+z(m)+z(s)))h=v-m-s;o")

function update() {
  O.textContent=F(+I.value).join`\n`
}

update()

<input id='I' value=119 type=number min=0 max=141 oninput='update()'><pre id=O></pre>

JavaScript、96バイト

v=>{for (i=86399;i;[a,b,c]=[i/3600|0,i%3600/60|0,i--%60]){v-a-b-c?0:console.log(a+":"+b+":"+c)}}

拡張ビュー：

v => {
    for (i = 86399; i;
        [a, b, c] = [i / 3600 | 0, i % 3600 / 60 | 0, i-- % 60]) {
        v - a - b - c ? 0 : console.log(a + ":" + b + ":" + c)
    }
}

86399を1にループして、可能な限りすべての時間をループします。

• 3600で除算して整数を時間に変換し、最初の桁を取得します
• 整数mod 3600を取得し、60で割ることにより、2桁目
• そして最後の桁は整数mod 60です

入力値から3つの数字をすべて減算して、3つの数字が入力値に達するとfalsey値を返します。値が偽の場合、値を出力します。

bash、78バイト（BSDユーティリティを使用）または79バイト（非BSDも）

これは@DigitalTraumaと@hvdの71バイトのbashソリューションよりも少し長いですが、ここではベース60で数値を使用するというアイデアが好きでした。誰かがこれをもう少しゴルフできるかどうか興味があります。

BSD標準のjotユーティリティを使用：

jot '-wx=`dc<<<60do3^%d+n`;((`dc<<<$x++'$1'-n`))||tr \  :<<<${x:3}' 86400 0|sh

より広く利用可能なseqユーティリティを使用すると：

seq '-fx=`dc<<<60do3^%.f+n`;((`dc<<<$x++'$1'-n`))||tr \  :<<<${x:3}' 0 86399|sh

アイデアは、0から83699までの数字を生成し、dcを使用してそれらをbase 60に変換することです。dcのbase-60出力の「数字」は00から59までの2桁の数字です。これは、00 00 00から23 59 59までの必要な時間をすべて、ほぼ必要な形式でリストします。

ただし、文字通り実行すると、60 ^ 2未満の数字は60を底とする3桁の数字ではないため、最初の00または00 00は欠落しています。そのため、実際には60 ^ 3〜60 ^ 3 + 83699の数値を生成しています。これにより、生成されるすべての数値が60桁で正確に4桁になることが保証されます。これは、最終的に不要な余分な最初の数字（01）を捨てる限り問題ありません。

したがって、目的の時間が生成されたら、01 00 00 00から01 23 59 59までの各4倍数を取得し、最後の3つの数値を加算して、引数$ 1を減算します。それが0の場合、3番目の文字から4倍のすべてを取り出し（「01」を捨てる）、trを使用してスペースをコロンに変換し、結果を出力します。

PowerShell、91 97バイト（入力を含む）

param($x)1..864e3|%{($d=date($_*1e7l))}|?{("{0:H+m+s}"-f$_|iex)-eq$x}|%{"{0:H:mm:ss}"-f$_}

param($x)0..23|%{$h=$_;0..59|%{$m=$_;0..59|?{$h+$m+$_-eq$x}|%{"{0:0}:{1:00}:{2:00}"-f$h,$m,$_}}}

または

param($x)0..23|%{$h=$_;0..59|?{($s=$x-$h-$_)-le59-and$s-ge0}|%{"{0:0}:{1:00}:{2:00}"-f$h,$_,$s}} <\ s>

展開とコメント

param($x)
#loop through the hours
0..23 | %{
    $h=$_
    #loop through the minutes
    0..59 | %{
        $m=$_
        #loop through the seconds
        0..59 | ?{ #filter for those where the sum matches the target
            $h + $m + $_ -eq $x
        } | %{
            #format the result
            "{0:#0}:{1:00}:{2:00}" -f $h, $m, $_
        }
    }
}

注意：@Briantistのバージョンを上回る：https ://codegolf.stackexchange.com/a/105163/6776