Imports System

Module Module1

    Sub Main()

        Dim tmp As String() = Split(Console.ReadLine(), " ")
        Dim H As Integer = CInt(tmp(0))
        Dim A As Integer = CInt(tmp(1))

        Dim dbl As Double = H / A
        Console.WriteLine(Math.Ceiling(dbl))

    End Sub

End Module
