結果
| 問題 | 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
            
            
            
        