print 2**53;
__END__
9.00719925474099e+015

##</code><code>##

$\ = "\n";
my $x = 2**53;
my $y = 2**53+1;
my $z = 2**53-1;
print $y-$x;
print $x-$z;
__END__
0
1