結果

問題 No.415 ぴょん
ユーザー jj
提出日時 2016-08-26 23:19:17
言語 Fortran
(gFortran 14.2.0)
結果
WA  
実行時間 -
コード長 201 bytes
コンパイル時間 124 ms
コンパイル使用メモリ 31,104 KB
実行使用メモリ 7,296 KB
最終ジャッジ日時 2024-11-08 09:50:50
合計ジャッジ時間 4,739 ms
ジャッジサーバーID
(参考情報)
judge2 / judge1
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
other AC * 17 WA * 7 TLE * 2 -- * 1
権限があれば一括ダウンロードができます

ソースコード

diff #

program main
  implicit none
  integer::N,D,tmp,i
  read *,N,D

  do i=1,D
     tmp = i*N
     if(MOD(tmp,D).eq.0) then
        print'(i0)',tmp/D-1
        return
     end if
  end do
end program main
0