Quà tặng (BT Pascal).

Quà tặng
Huấn luyện viên của Jacqueline Yo, vận động viên bơi lội Olympic của Singapore, lo lắng về kiểu bơi của cô ấy. Anh ấy ghi lại sự tính toán thời gian mỗi ngày của cô ấy trong từng mili giây (một mili giây là một phần nghìn của giây) và đưa ra một kế hoạch mà nhờ đó mỗi thời gian cô ấy đạt được một sự tính toán thời gian ít hơn sự tính toán thời giancủa ngày hôm trước bời ít nhất một số nhất định của mili giây, anh ấy sẽ thưởng cho cô ấy một món quà nhỏ khích lệ.
Cho danh sách sự tính toán thời gian mỗi ngày, xác định có bao nhiêu quà Jacqueline sẽ nhận được.
Dữ liệu vào từ file GIFT.IN Dòng đầu chứa 2 số nguyên N và K, N (3<=N<=100) là số ngày, và K (0Kết quả ghi ra file GIFT.OUT chỉ một số nguyên đơn cho biết số lượng quà tặng.
Ví dụ:
GIFT.IN
GIFT.OUT

6 100
59420
59410
59310
59290
59470
59350
2


The coach of Jacqueline Yo, Olympic swimmer for Singapore, is concerned about her
Butterfly stroke. He records her daily timing in milliseconds (a millisecond is onethousand
of a second) and devises a scheme whereby each time she achieves a timing
that is lower than the previous day’s timing by at least a certain number of milliseconds,
he will reward her with a small encouragement gift.
Given a list of daily timings, determine how many gifts Jacqueline would have
received.
Input File: GIFT.IN
The first line contains 2 integers and , where () is the number of
days, and () the desired improvement (in milliseconds). Whenever
Jacqueline’s timing reduces by at least milliseconds over the previous day’s timing,
she will receive a gift from her coach. The first line is then followed by lines where
each line contains a single integer () which is Jacqueline’s daily
timing in milliseconds. The timing records are listed in chronological order.
Example
6 100
59420
59410
59310
59290
59470
59350
Output File: GIFT.OUT
The output file consists of a single integer that indicates the number of gifts Jacqueline
would have received.
Example
2


Thuật toán