local mod = 998244353 local mfl = math.floor local function bmul(x, y) local x0, y0 = x % 31596, y % 31596 local x1, y1 = mfl(x / 31596), mfl(y / 31596) return (x1 * y1 * 62863 + (x1 * y0 + x0 * y1) * 31596 + x0 * y0) % mod end local function badd(x, y) return (x + y) % mod end local function bsub(x, y) return x < y and x - y + mod or x - y end local ffi = require("ffi") local C = ffi.C ffi.cdef[[ long long atoll(const char*); ]] local function lltonumber(str) return C.atoll(str) end local m = io.read() m = lltonumber(m) - 1LL local n = 2 local mat = {} local tmpmat = {} for i = 1, n do tmpmat[i] = {} mat[i] = {} end local vec = {} local tmpvec = {} vec[1] = 1 vec[2] = 0 mat[1][1] = 1 mat[1][2] = 1 mat[2][1] = 1 mat[2][2] = 0 local function matmat() for i = 1, n do for j = 1, n do local v = 0 for k = 1, n do v = badd(v, bmul(mat[i][k], mat[k][j])) end tmpmat[i][j] = v end end for i = 1, n do for j = 1, n do mat[i][j] = tmpmat[i][j] end end end local function matvec() for i = 1, n do local v = 0 for k = 1, n do v = badd(v, bmul(mat[i][k], vec[k])) end tmpvec[i] = v end for i = 1, n do vec[i] = tmpvec[i] end end while 0LL < m do if m % 2LL == 1LL then matvec() end matmat() m = m / 2LL end local ans = (vec[1] + vec[2] + mod - 1) % mod print(ans)