integer::L,N character::S read *,L,N,S print '(i0)',N*2**(L-3) end