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