chomp(my $in = <STDIN>);
my @sf = split / /, $in;
print int($sf[0]/$sf[1] + 1),"\n";