Дан целочисленный массив A размера N. Найти номера тех элементов массива, которые больше
своего правого соседа, и количество таких элементов. Найденные номера выводить в порядке их
возрастания.
На Паскале

он задает случайные числа

А, окей. У меня правда проблема конкретно с тем, что числа вводятся с клавиатуры и на каком-то моменте компилятор начинает гавкать, что я ввел число больше по индексу, чем длина массива)

тебе нужен ввод с клавы?

да. и длина массива - константа)

var a: array [1..1000] of integer; i,j,n,k:integer;begin write ('количество чисел'); read(n);for i:=1 to n do beginread(a[i]);end;for i:=1 to n-1 dobegin if (a[i]>a[i+1] )then writeln(i);end;end.