program kyomu
    use,intrinsic :: iso_fortran_env
    implicit none
    integer(int32):: antena(5),k,i,j

    do i=1,5
        read*, antena(i)
    end do
    read*, k

    do i=1,4
        do j=i+1,5
            if (antena(j)-antena(i) > k) then
                print'(a)', ':('
                stop
            end if
        end do
    end do
    print'(a)', 'Yay!'

end program kyomu