結果
| 問題 |
No.744 循環小数N桁目 Easy
|
| コンテスト | |
| ユーザー |
|
| 提出日時 | 2019-05-09 17:55:20 |
| 言語 | OCaml (5.2.1) |
| 結果 |
AC
|
| 実行時間 | 2 ms / 2,000 ms |
| コード長 | 174 bytes |
| コンパイル時間 | 245 ms |
| コンパイル使用メモリ | 21,572 KB |
| 実行使用メモリ | 6,820 KB |
| 最終ジャッジ日時 | 2024-10-09 00:37:26 |
| 合計ジャッジ時間 | 980 ms |
|
ジャッジサーバーID (参考情報) |
judge2 / judge5 |
(要ログイン)
| ファイルパターン | 結果 |
|---|---|
| sample | AC * 3 |
| other | AC * 7 |
ソースコード
let () =
let n = Scanf.scanf "%d\n" (fun x -> x) in
let lst = [2; 8; 5; 7; 1; 4] in
Printf.printf "%d\n" (List.nth lst (if n mod 6 = 0 then 5 else (n mod 6 - 1)))