-module(i).
-export([m/0]).
m()->io:format([7*(X+1)rem 128||X<-io:get_line('')]).