m@main=getLine>>=print.foldl(#)0>>m
n#x=8*n+read[x]-sum[1|'4'<x]