結果
| 問題 | No.415 ぴょん |
| ユーザー |
 jj
|
| 提出日時 | 2016-08-26 23:14:10 |
| 言語 | Fortran (gFortran 13.2.0) |
| 結果 |
MLE
|
| 実行時間 | - |
| コード長 | 462 bytes |
| コンパイル時間 | 125 ms |
| コンパイル使用メモリ | 31,872 KB |
| 実行使用メモリ | 790,184 KB |
| 最終ジャッジ日時 | 2024-04-25 21:45:32 |
| 合計ジャッジ時間 | 2,609 ms |
|
ジャッジサーバーID （参考情報） |
judge4 / judge2 |
（要ログイン）
テストケース
テストケース表示| 入力 | 結果 | 実行時間 実行使用メモリ |
|---|---|---|
| testcase_00 | AC | 1 ms
13,752 KB |
| testcase_01 | AC | 1 ms
6,940 KB |
| testcase_02 | AC | 1 ms
6,940 KB |
| testcase_03 | MLE | - |
| testcase_04 | -- | - |
| testcase_05 | -- | - |
| testcase_06 | -- | - |
| testcase_07 | -- | - |
| testcase_08 | -- | - |
| testcase_09 | -- | - |
| testcase_10 | -- | - |
| testcase_11 | -- | - |
| testcase_12 | -- | - |
| testcase_13 | -- | - |
| testcase_14 | -- | - |
| testcase_15 | -- | - |
| testcase_16 | -- | - |
| testcase_17 | -- | - |
| testcase_18 | -- | - |
| testcase_19 | -- | - |
| testcase_20 | -- | - |
| testcase_21 | -- | - |
| testcase_22 | -- | - |
| testcase_23 | -- | - |
| testcase_24 | -- | - |
| testcase_25 | -- | - |
| testcase_26 | -- | - |
ソースコード
program main
implicit none
integer::N,D,M
integer::i,cur,total,step,next
integer,allocatable::ashiba(:)
read *,N,D
allocate(ashiba(0:D))
cur = 0
ashiba=1
total = 0
M = D-(N-N/D*D)
do i=1,D
ashiba(cur) =0
next = MOD(cur + M,D)
step = (N + next - cur)/D
total = total + step
if(ashiba(next).eq.0) then
total = total -1
exit
end if
cur = next
end do
print '(i0)',total
end program main