#include <bits/stdc++.h>
using namespace std;
int main()
{
int n;
cin>>n; // 5
int b[n+1]; // 1 - based indexing
for(int i=1; i<=n; i++)
{
cin>>b[i]; // 1 2 3 4 5
}
int k;
cin>>k; // 3
int count = 0;
for(int i=1; i<=n-k+1; i++) // i=1 starting point till n-k+1 means end point 5 - 3 + 1 = 3 --> i < 3
{
// i --> start point of Each Subarray of size 'k' which we are considering
int start = i;
bool check = true;
// 'i' index it means start index + k - 1
int end = i + k - 1; // 1 + 3 -1 --> 3 it means till third index it will go
while(start < end) // Becoz I am comparing start with one index Ahead which is start + 1
{
if(b[start] < b[start + 1]) // All the Adjacent Elements should be increasing order
{
check = true;
}
else
{
check = false;
}
start = start + 1;
// O(k)
}
// O(N)
if(check == true)
{
count = count + 1;
}
}
cout<<count;
return 0;
}
/*
input:
5
1 2 3 4 5
3
output:
3
How did the output 3 came
1 < 2 < 3 < 4 < 5
k = 3 subarray size should be 3
1 < 2 < 3 --> 1 subarray
2 < 3 < 4 --> 2 subarray
3 < 4 < 5 --> 3 subarray
*/
I2luY2x1ZGUgPGJpdHMvc3RkYysrLmg+CnVzaW5nIG5hbWVzcGFjZSBzdGQ7CgppbnQgbWFpbigpIAp7CiAgICBpbnQgbjsKICAgIGNpbj4+bjsgLy8gNQoKICAgIGludCBiW24rMV07IC8vIDEgLSBiYXNlZCBpbmRleGluZwogICAgZm9yKGludCBpPTE7IGk8PW47IGkrKykKICAgIHsKICAgICAgICBjaW4+PmJbaV07IC8vIDEgMiAzIDQgNQogICAgfQoKICAgIGludCBrOwogICAgY2luPj5rOyAvLyAzCgogICAgaW50IGNvdW50ID0gMDsKICAgIGZvcihpbnQgaT0xOyBpPD1uLWsrMTsgaSsrKSAvLyBpPTEgc3RhcnRpbmcgcG9pbnQgdGlsbCBuLWsrMSBtZWFucyBlbmQgcG9pbnQgNSAtIDMgKyAxID0gMyAtLT4gaSA8IDMKICAgIHsKICAgICAgICAvLyBpIC0tPiBzdGFydCBwb2ludCBvZiBFYWNoIFN1YmFycmF5IG9mIHNpemUgJ2snIHdoaWNoIHdlIGFyZSBjb25zaWRlcmluZwogICAgICAgIGludCBzdGFydCA9IGk7CiAgICAgICAgYm9vbCBjaGVjayA9IHRydWU7CiAgICAgICAgLy8gICAgICAgICAgJ2knIGluZGV4IGl0IG1lYW5zICBzdGFydCBpbmRleCArIGsgLSAgMQogICAgICAgIGludCBlbmQgPSBpICsgayAtIDE7ICAvLyAxICsgMyAtMSAtLT4gMyBpdCBtZWFucyB0aWxsIHRoaXJkIGluZGV4IGl0IHdpbGwgZ28gCgogICAgICAgIHdoaWxlKHN0YXJ0IDwgZW5kKSAvLyBCZWNveiBJIGFtIGNvbXBhcmluZyBzdGFydCB3aXRoIG9uZSBpbmRleCBBaGVhZCB3aGljaCBpcyBzdGFydCArIDEKICAgICAgICB7CiAgICAgICAgICAgIGlmKGJbc3RhcnRdIDwgYltzdGFydCArIDFdKSAvLyBBbGwgdGhlIEFkamFjZW50IEVsZW1lbnRzIHNob3VsZCBiZSBpbmNyZWFzaW5nIG9yZGVyCiAgICAgICAgICAgIHsKICAgICAgICAgICAgICAgIGNoZWNrID0gdHJ1ZTsKICAgICAgICAgICAgfQogICAgICAgICAgICBlbHNlCiAgICAgICAgICAgIHsKICAgICAgICAgICAgICAgIGNoZWNrICA9IGZhbHNlOwogICAgICAgICAgICB9CiAgICAgICAgICAgIHN0YXJ0ID0gc3RhcnQgKyAxOwogICAgICAgICAgICAvLyBPKGspCiAgICAgICAgfQogICAgICAgLy8gTyhOKSAgIAoKICAgICAgICBpZihjaGVjayA9PSB0cnVlKQogICAgICAgIHsKICAgICAgICAgICAgY291bnQgPSBjb3VudCArIDE7CiAgICAgICAgfQogICAgfQogICAgY291dDw8Y291bnQ7CgogICAgcmV0dXJuIDA7Cn0KCi8qCmlucHV0Ogo1CjEgMiAzIDQgNSAgCjMKCm91dHB1dDoKMwoKSG93IGRpZCB0aGUgb3V0cHV0IDMgY2FtZSAKMSA8IDIgPCAzIDwgIDQgPCA1CgprID0gMyBzdWJhcnJheSAgc2l6ZSBzaG91bGQgYmUgMwoKMSA8IDIgPCAzIC0tPiAxIHN1YmFycmF5CjIgPCAzIDwgNCAtLT4gMiBzdWJhcnJheQozIDwgNCA8IDUgLS0+IDMgc3ViYXJyYXkgCgoKKi8=