1. В) Убывающим

2. Здесь не указано откуда эти числа берутся, поэтому будем получать их с клавиатуры, а затем сразу проверять больше ли они максимума (если нужен вариант с массивом - напишите в комментарии об этом)

var

x, _max : real;

i : integer;

begin

readln(_max);

for i := 1 to 4 do

begin

readln(x);

if x > _max then

_max := x;

end;

writeln('MAX:',_max:5:2);

end.

Ответ:

Рассмотрим решения задач последовательно.

Объяснение:

1) Порядок, при котором в массиве первый элемент имеет самое большое значение, а значение каждого следующего элемента не больше значения предыдущего элемента, называют убывающим.

Однако следует отметить, это не совсем так. Например, для чисел [15, 14, 14, 14] - порядок верно называется невозрастающим, т.к. 14 не больше 14.

2) Программа довольно несложная, приведу 3 решения на различных языках.