$_=get;say (100+(words.sum%$_||$_))div+$_