#118409 (Fortran) No.374 コイン - yukicoder

提出ソース

結果

問題	No.374 コイン
ユーザー	jj
提出日時	2016-09-22 21:28:37
言語	Fortran (gFortran 13.2.0)
結果	RE
実行時間	-
コード長	150 bytes
コンパイル時間	1,721 ms
コンパイル使用メモリ	29,056 KB
実行使用メモリ	6,820 KB
最終ジャッジ日時	2024-11-17 13:12:03
合計ジャッジ時間	2,554 ms
ジャッジサーバーID （参考情報）	judge5 / judge2

このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示

入力	結果	実行時間実行使用メモリ
testcase_00	AC	1 ms 5,248 KB
testcase_01	AC	1 ms 5,248 KB
testcase_02	AC	1 ms 5,248 KB
testcase_03	AC	1 ms 5,248 KB
testcase_04	AC	1 ms 5,248 KB
testcase_05	AC	1 ms 5,248 KB
testcase_06	AC	1 ms 5,248 KB
testcase_07	AC	1 ms 5,248 KB
testcase_08	AC	1 ms 5,248 KB
testcase_09	RE	-
testcase_10	RE	-
testcase_11	RE	-
testcase_12	AC	1 ms 5,248 KB
testcase_13	AC	1 ms 5,248 KB
testcase_14	AC	1 ms 5,248 KB
testcase_15	AC	1 ms 5,248 KB
testcase_16	AC	1 ms 5,248 KB
testcase_17	AC	1 ms 5,248 KB
testcase_18	AC	1 ms 5,248 KB
testcase_19	AC	1 ms 5,248 KB
testcase_20	RE	-
testcase_21	RE	-
testcase_22	RE	-
testcase_23	AC	1 ms 5,248 KB
testcase_24	AC	1 ms 5,248 KB
testcase_25	AC	1 ms 5,248 KB
testcase_26	RE	-
testcase_27	AC	1 ms 5,248 KB
testcase_28	RE	-
testcase_29	RE	-
testcase_30	RE	-

権限があれば一括ダウンロードができます

ソースコード

raw source code

program main
  implicit none
  integer::A,B
  read *,A,B
  if(A.ge.B) then
     print '(a)',"S"
  else
     print '(a)',"K"
  end if
end program main

0