program main implicit none character*9::S character*9::yukicoder="yukicoder" integer::pos read *,S pos = SCAN(S, '?') print '(a)', yukicoder(pos:pos) end program main