use strict;
use warnings;
use utf8;
use POSIX;

my $line = <STDIN>;
chomp $line;
my ($S, $F) = split /\s/, $line;
my $ans = 0;
if ($F != 0){
	$ans = floor ($S / $F) + 1;
}
print "$ans\n";