結果
| 問題 | 
                            No.889 素数!
                             | 
                    
| コンテスト | |
| ユーザー | 
                             | 
                    
| 提出日時 | 2020-06-21 11:16:18 | 
| 言語 | OCaml  (5.2.1)  | 
                    
| 結果 | 
                             
                                AC
                                 
                             
                            
                         | 
                    
| 実行時間 | 2 ms / 2,000 ms | 
| コード長 | 397 bytes | 
| コンパイル時間 | 422 ms | 
| コンパイル使用メモリ | 21,452 KB | 
| 実行使用メモリ | 5,248 KB | 
| 最終ジャッジ日時 | 2024-10-09 01:34:54 | 
| 合計ジャッジ時間 | 2,203 ms | 
| 
                            ジャッジサーバーID (参考情報)  | 
                        judge2 / judge3 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| sample | AC * 3 | 
| other | AC * 61 | 
ソースコード
Scanf.scanf "%d" (fun n ->
    print_endline @@ match n with
    | 6
    | 28 -> "Kanzensu!"
    | 8
    | 27
    | 64 -> "Ripposu!"
    | 4
    | 9
    | 16
    | 25
    | 36
    | 49 -> "Heihosu!"
    | 2
    | 3
    | 5
    | 7
    | 11
    | 13
    | 17
    | 19
    | 23
    | 29
    | 31
    | 37
    | 41
    | 43
    | 47
    | 53
    | 59
    | 61 -> "Sosu!"
    | _ -> string_of_int n
)