eval {2,5}'
e+=m%$_==0?m/=$_,n=n%10*10/$_:
n=$m
read m
m=${m%${m/*[^0]}}
'
'a?a=b%(b=a),_:b'
for((a=n,b=m,n/=_,m/=_;$e 0;)){ :;}
echo $[m-1?-1:n%10]