Return to Answer

added 72 characters in body

edited Jul 23, 2018 at 19:13

Perl 5 with `-p`, 1818 15 bytes

$_=int(~$_=1+--$_/100)+1100|0

(-3 whole bytes, thanks to @Dom Hastings.)

Or with -p -MPOSIX:

$_=ceil($_$_=ceil$_/100)

(-2 bytes, again thanks to @Dom Hastings.)

$_=int(~-$_/100)+1

Or with -p -MPOSIX:

$_=ceil($_/100)

$_=1+--$_/100|0

(-3 whole bytes, thanks to @Dom Hastings.)

Or with -p -MPOSIX:

$_=ceil$_/100

(-2 bytes, again thanks to @Dom Hastings.)

answered Jul 23, 2018 at 18:43

$_=int(~-$_/100)+1

Or with -p -MPOSIX:

$_=ceil($_/100)