結果
| 問題 | No.964 2020 |
| ユーザー |
 maimai8
|
| 提出日時 | 2020-05-01 20:10:06 |
| 言語 | OCaml (5.1.0) |
| 結果 |
MLE
|
| 実行時間 | - |
| コード長 | 203 bytes |
| コンパイル時間 | 323 ms |
| コンパイル使用メモリ | 19,560 KB |
| 実行使用メモリ | 816,648 KB |
| 最終ジャッジ日時 | 2024-10-09 00:59:01 |
| 合計ジャッジ時間 | 5,198 ms |
|
ジャッジサーバーID （参考情報） |
judge4 / judge5 |
（要ログイン）
テストケース
テストケース表示| 入力 | 結果 | 実行時間 実行使用メモリ |
|---|---|---|
| testcase_00 | MLE | - |
| testcase_01 | -- | - |
| testcase_02 | -- | - |
| testcase_03 | -- | - |
| testcase_04 | -- | - |
| testcase_05 | -- | - |
| testcase_06 | -- | - |
| testcase_07 | -- | - |
| testcase_08 | -- | - |
| testcase_09 | -- | - |
ソースコード
let n = read_int ()
let rec f l m n =
if m = 0 then f l l (n-1) else if n = 0 && m = 0 then []
else (string_of_int n) :: f l (m-1) n
let () = print_endline (List.fold_left (^) "" (f n n (n-1)))