оптимизация кода1

[Programmer121]

Помогите оптимизировать программу
мой код:

#include <iostream>
#include <cmath>
using namespace std;
int main ()
{

    int n,d,i,j,k=0,key;
    cin>>n;
    int arr[200000];
    for(i=1;i<=n;i++){
        cin>>arr[i];
}
    for (j = 2;j<=n;j++){
    key = arr[j];
    i = j - 1;
    while (i > 0 && arr[i] > key){
         arr[i+1] = arr[i];
         i = i - 1;}
    arr[i+1] = key;
         }
      for(i=1;i<=n;i++){
          if(abs(arr[i]-arr[i+1])<=d) {i+=2;k++;}
       }
        cout<<k;
        return 0;
     }

в задаче дан массив чисел размера n.
в этом массиве необходимо найти количество разниц которые меньше d.
в том смысле что к примеру abs(a[i]-a[j]) <=d -> p++; где p - счетчик.
если есть вопросы насчет условия задавать.
Помогите ускорить на МАКСИМАЛЬНЫЙ уровень программу


_____
Код программы нужно выделять (форматировать) тегами [CODE] (читать FAQ)
Модератор

[evg_m]

1. отсортировать массив по возрастанию
2. берем b[i] и ищем к нему парные справа(большие чем он), те которые слева мы уже проверили при меньших значениях i (он тогда был справа).
3. нужные нам находятся НЕ ДАЛЕЕ чем на х шагов, так что b[i+x]-b[i] <=d<b[i+x+1]-b[i] {или так b[i+x]<=d-b[i]<b[i] }
4. p+=x; если это не было сделано при выполнении п.3.(поиске значения x)

[Programmer121]

Сообщение от evg_m

1. отсортировать массив по возрастанию
2. берем b[i] и ищем к нему парные справа(большие чем он), те которые слева мы уже проверили при меньших значениях i (он тогда был справа).
3. нужные нам находятся НЕ ДАЛЕЕ чем на х шагов, так что b[i+x]-b[i] <=d<b[i+x+1]-b[i] {или так b[i+x]<=d-b[i]<b[i] }
4. p+=x; если это не было сделано при выполнении п.3.(поиске значения x)

напишите пожалуйста псевдокод...так непонятно...что такое х и сотальное
p.s (псевдокод код приближенный к ор игинальному коду...понятный для всех)

[evg_m]

1. сортрировка исходного массива и получение массива b
2 for  i:=1 to n do
3. for j:=i+1 to n do
   if b[j]-b[i]<=d then p:=p+1 //нам подходит
   else {x:=j-1;} break; //все БОЛЬШЕ подходящих мы не найдем
4.--------{смотри курсив}