結果
問題 | No.394 ハーフパイプ(1) |
ユーザー |
![]() |
提出日時 | 2017-02-14 23:39:51 |
言語 | Vim script (v9.1) |
結果 |
AC
|
実行時間 | 12 ms / 2,000 ms |
コード長 | 620 bytes |
コンパイル時間 | 175 ms |
コンパイル使用メモリ | 5,248 KB |
実行使用メモリ | 12,032 KB |
最終ジャッジ日時 | 2024-12-29 22:41:16 |
合計ジャッジ時間 | 1,163 ms |
ジャッジサーバーID (参考情報) |
judge3 / judge4 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | AC * 11 |
ソースコード
function! s:output() let this = {'lines': []} function! this.append(line) abort call add(self.lines, a:line) endfunction function! this.build() abort return join(self.lines, "\n") endfunction return this endfunction function! s:main(input) abort let o = s:output() let s_list = map(split(a:input[0], ' '), 'str2nr(v:val)') let s_list = sort(s_list, {l, r -> l - r}) let sum = 0 for i in range(1, 4) let sum += s_list[i] endfor let r = printf('%.2f', sum / 4.0) call o.append(r) return o.build() endfunction let s:input = getline(1, '$') enew put =s:main(s:input) 2,$print