use constant INF => 9**9E9;
local($\, $,) = ("\n", "\t");
for my $e (305 .. 310) {
    my $n = 10**$e;
    print $e, $n, INF > $n || 0, -$n, -(INF) < - $n || 0;
}