read -dx w d
for((;d-1;w-=w/d/d--)){ :;}
echo $w