• Предмет: Информатика
  • Автор: sviatkuznetsov
  • Вопрос задан 7 лет назад

Заполните массив 20 числами от -10 до 50. Вывести элементы числового массива, которые больше, чем элементы, стоящие перед ними. На экран исходный массив и числа, например: массив [7, 12, 1, 4, 7, 5]. Следует вывести числа 12, 4, 7 так как перед ними стоят соответственно числа 7, 1 и 4, которые меньше их.

ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!!!!!!!!!!!!

Ответы

Ответ дал: BobbyFresnel
0

// PascalABC.NET

begin

 var a := ArrRandom(20, -10, 50);

 a.Println;

 for var i := 2 to a.High do

   if a[i] > a[i - 1] then

     Print(a[i])

end.

Приложения:
Вас заинтересует