結果
問題 | No.816 Beautiful tuples |
ユーザー | yosutecon |
提出日時 | 2019-05-17 15:15:56 |
言語 | Julia (1.10.2) |
結果 |
WA
|
実行時間 | - |
コード長 | 433 bytes |
コンパイル時間 | 57 ms |
コンパイル使用メモリ | 6,940 KB |
実行使用メモリ | 249,264 KB |
最終ジャッジ日時 | 2024-04-09 14:15:36 |
合計ジャッジ時間 | 5,944 ms |
ジャッジサーバーID (参考情報) |
judge4 / judge5 |
(要ログイン)
テストケース
テストケース表示入力 | 結果 | 実行時間 実行使用メモリ |
---|---|---|
testcase_00 | WA | - |
testcase_01 | AC | 322 ms
245,212 KB |
testcase_02 | AC | 324 ms
246,464 KB |
testcase_03 | WA | - |
testcase_04 | AC | 322 ms
246,788 KB |
testcase_05 | AC | 323 ms
245,824 KB |
testcase_06 | AC | 325 ms
247,936 KB |
testcase_07 | AC | 323 ms
248,276 KB |
testcase_08 | AC | 319 ms
245,024 KB |
testcase_09 | AC | 322 ms
247,960 KB |
testcase_10 | WA | - |
testcase_11 | WA | - |
testcase_12 | AC | 322 ms
245,804 KB |
testcase_13 | AC | 320 ms
246,232 KB |
testcase_14 | AC | 320 ms
245,592 KB |
ソースコード
parseInt(x)=parse(Int,x) parseMap(x::Array{SubString{String},1})=map(parseInt,x) function main() a,b = readline() |> split |> parseMap c = Int[] r = 1 while r <= sqrt(a+b) if (a+b)%r == 0 push!(c,r) push!(c,div(a+b,r)) end r += 1 end c = sort(c) f = 0 for i in 1:length(c) if (a+c[i])%b==0 && (b+c[i])%a==0 && a!=c && b!=c println(c[i]) f = 1 break end end if f == 0 println(-1) end end main()