結果
| 問題 |
No.486 3 Straight Win(3連勝)
|
| コンテスト | |
| ユーザー |
yoza
|
| 提出日時 | 2017-02-24 23:21:17 |
| 言語 | Vim script (v9.1) |
| 結果 |
AC
|
| 実行時間 | 11 ms / 2,000 ms |
| コード長 | 558 bytes |
| コンパイル時間 | 57 ms |
| コンパイル使用メモリ | 6,944 KB |
| 実行使用メモリ | 11,776 KB |
| 最終ジャッジ日時 | 2024-06-26 04:05:02 |
| 合計ジャッジ時間 | 2,161 ms |
|
ジャッジサーバーID (参考情報) |
judge3 / judge4 |
(要ログイン)
| ファイルパターン | 結果 |
|---|---|
| other | AC * 28 |
ソースコード
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 r = 'NA'
let cww = matchstr(a:input[0], 'O\{3}\|X\{3}')
if cww == 'OOO'
let r = 'East'
elseif cww == 'XXX'
let r = 'West'
endif
call o.append(r)
return o.build()
endfunction
let s:input = getline(1, '$')
enew
put =s:main(s:input)
2,$print
yoza