結果

問題 No.513 宝探し2
ユーザー jj
提出日時 2017-05-05 22:56:36
言語 Fortran
(gFortran 14.2.0)
結果
AC  
実行時間 26 ms / 2,000 ms
コード長 296 bytes
コンパイル時間 116 ms
コンパイル使用メモリ 30,720 KB
実行使用メモリ 24,964 KB
平均クエリ数 5.00
最終ジャッジ日時 2024-07-17 01:00:16
合計ジャッジ時間 1,377 ms
ジャッジサーバーID
(参考情報)
judge4 / judge2
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
other AC * 12
権限があれば一括ダウンロードができます

ソースコード

diff #

program main
  implicit none
  integer::AX=0,AY=0
  integer::lm,um
  print '("0 -1")'
  read *, lm
  print '("100000 -1")'
  read *, um
  AX = (lm-um)/2+50000
  print '("-1 0")'
  read *, lm
  print '("-1 100000")'
  read *, um
  AY = (lm-um)/2+50000
  print '(i0," ",i0)',AX,AY
end program main
0