結果
| 問題 |
No.250 atetubouのzetubou
|
| コンテスト | |
| ユーザー |
|
| 提出日時 | 2019-01-19 13:46:40 |
| 言語 | Nim (2.2.0) |
| 結果 |
AC
|
| 実行時間 | 4 ms / 5,000 ms |
| コード長 | 870 bytes |
| コンパイル時間 | 2,163 ms |
| コンパイル使用メモリ | 61,320 KB |
| 実行使用メモリ | 5,376 KB |
| 最終ジャッジ日時 | 2024-07-01 10:20:44 |
| 合計ジャッジ時間 | 2,979 ms |
|
ジャッジサーバーID (参考情報) |
judge5 / judge2 |
(要ログイン)
| ファイルパターン | 結果 |
|---|---|
| sample | AC * 2 |
| other | AC * 20 |
ソースコード
template times*(n:int,body) = (for _ in 0..<n: body)
proc getchar_unlocked():char {. importc:"getchar_unlocked",header: "<stdio.h>" .}
proc scan(): int =
while true:
var k = getchar_unlocked()
if k < '0': break
result = 10 * result + k.ord - '0'.ord
proc printf(formatstr: cstring){.header: "<stdio.h>", varargs.}
proc put(c:char){. importc:"putchar_unlocked",header: "<stdio.h>" .}
proc impl() =
template OK() =
put('A')
put('C')
put('\n')
return
template NG() =
put('Z')
put('E')
put('T')
put('U')
put('B')
put('O')
put('U')
put('\n')
return
var d = scan() - 1# 深さ
var x = scan()
let t = scan()
if t == 0: NG()
if d == 0: OK()
var ans = 1
if d > x : swap(x,d)
for i in 1..d:
ans = ans * (x+i) div i
if ans <= t : continue
NG()
OK()
let q = scan()
q.times: impl()