use bigint; $x=<>; if($x>31){ print'0 0',$/ }else{ print 31->bnok($x),$",30->bnok($x-1)*((1<<31)-1),$/ }