f(){ read p&&echo $[(p/2*2)**2]&&f;} read f