print$y+grep$y=999e6*($`*$_/100<int$&*$_/100+$'),<>=~/ .* /..1e6