use strict;
use warnings;

my $line = "50 123";
chomp $line;

my($S, $F) = split / /, $line;

print int ($S / $F) + 1 , "\n";