Question

Дан массив из 10 целых чисел, заданных случайно из диапазона от -10 до 10. Сколько чисел в массиве меньше своего соседа слева, но больше соседа справа?

Answer 1

////////Pascal abc//////
Результат выполнения программы:
 -10   5  10   2   7   3  -3  -2   5   5
кол-во=1

bf0eb8baa95adf0748f9a3c25c205604.pas