Дан массив с. Найти сколько элементов в массиве меньше своих левых соседей.

program a1; const n=20; var c: array [1… 100] of integer; var i,k: integer; begink: =0; for i: =1 to n do beginc[i]: =random (101) -50; {заполнение массива произвольно от -50 до 50}write (',c[i]); {вывод массива на экран}end; for i: =2 to n doif c[i] комментировать