結果

問題 No.536 人工知能
ユーザー aronia_jam
提出日時 2017-06-30 22:30:37
言語 Fortran
(gFortran 4.8.5)
結果
AC  
実行時間 2 ms
コード長 233 Byte
コンパイル時間 977 ms
使用メモリ 960 KB
最終ジャッジ日時 2019-11-20 02:07:55

テストケース

テストケース表示
入力 結果 実行時間
使用メモリ
aaaaaaaaai.txt AC 1 ms
956 KB
aaaaaaaaaz.txt AC 2 ms
956 KB
abcaiaixyz.txt AC 1 ms
960 KB
ai.txt AC 2 ms
956 KB
aiabcxyzai.txt AC 1 ms
960 KB
aiz.txt AC 1 ms
960 KB
chokudai.txt AC 2 ms
956 KB
iiiiiiiiia.txt AC 1 ms
960 KB
mai.txt AC 2 ms
960 KB
maibuyoh.txt AC 2 ms
960 KB
yuki.txt AC 1 ms
960 KB
テストケース一括ダウンロード

ソースコード

diff #
program main
  implicit none
  character*13::S
  integer::len
  read *,S
  len = LEN_TRIM(S)
  if(S(len-1:len).eq."ai") then
     S(len-1:len) = "AI"
  else
     S(len+1:len+3) = "-AI"
  end if
  print '(a)',TRIM(S)
end program main
0