結果
| 問題 | No.932 解法破綻!高橋君 |
| コンテスト | |
| ユーザー |
|
| 提出日時 | 2020-04-28 23:40:26 |
| 言語 | OCaml (5.2.1) |
| 結果 |
AC
|
| 実行時間 | 31 ms / 2,000 ms |
| コード長 | 194 bytes |
| 記録 | |
| コンパイル時間 | 305 ms |
| コンパイル使用メモリ | 19,568 KB |
| 実行使用メモリ | 11,008 KB |
| 最終ジャッジ日時 | 2024-10-09 00:57:26 |
| 合計ジャッジ時間 | 1,044 ms |
|
ジャッジサーバーID (参考情報) |
judge4 / judge2 |
(要ログイン)
| ファイルパターン | 結果 |
|---|---|
| other | AC * 20 |
ソースコード
open Str
let lst = split (regexp ",") (read_line ())
let ans =
if List.mem "WA" lst || List.mem "TLE" lst || List.mem "MLE" lst
then "Failed..." else "Done!"
let () = print_endline ans