Создать в декартовой системе координат графики функций:
y1 = ax^3 + bx^2 + cx + d
y2= ax^2 + bx + c
(х изменяется от -20 до +20 с шагом 0.5; значения a,b,c, d задаюся в отдельных ячейках )

Ну, условие крайне странное, я понимаю так, что числовой промежуток дан в 10тичной системе счисления, и каждое целое число на промежутке необходимо перевести в 16ричное.
Если промежуток [28; 30], то это означает что туда входят такие целые числа как 28, 29, 30 (если промежуток обозначается квадратными скобками '[' и ']', то это включая числа что указаны его границами, если же круглыми '(' и ')', то не включая их.

Перейдем к переводу десятичных чисел в шестнадцатиричную систему счислени. Для этого делем число на 16, паралельно записывая его остаток и продолжая до тех пор, пока оно не станет меньше 16.
28 / 16 = 1; остаток 12

Тут ничего сложного, пользуемся табличкой переводов, смотрим, 12 из десятичной в 16ричной это буква C, а 1 оставляем как есть.
Теперь запишим полученные числа:
1C - Это 28 в 16ричной

Точно так же переводим из 10тичной в 16ричную 29:
29/16 = 1; остаток 13
Получается 1D

Ну и как не трудно догадаться, 30 в 16ричной будет 1E. Но для наглядности проведем расчёты:
30/16=1; остаток 14

Постскриптум:
— Задание сформулированно крайне не понятно и вот почему:
Нижним индексом, по обыкновению, указывают систему счисления текущего числа, но тогда нет никакого смысла переводить в 16ричную систему из 16ричной.
— Другой вариант, что 28 и 30 это числа указанные не в 16ричной, но они могут быть в любой системе счисления где больше 8 цифр :)

Если предерживаться первого предположения, то нужно просто записать все цифры 16ричной системы счисления от 28 до 30 включительно, тогда это будет:
28, 29, 30
Что вообще смысла не имеет, так что не претендую на идеально правильное решение, но это единственное адекватное, что пришло мне в голову. Может этот идеотизм как-то и по другому закручен :D

// PascalABC.NET 3.3, сборка 1541 от 29.09.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ReadArrInteger('Введите 70 целых чисел:',70);
  var l:=a.Zip(a[1:],(x,y)->(x>y)).All(x->x=true);
  Writeln('l=',l)
end.

Примеры
Введите 70 целых чисел: 95 91 89 87 82 81 80 75 74 73 72 66 62 59 56 54 51 49 48 47 43 39 35 34 32 31 28 26 16 11 10 9 -2 -3 -5 -8 -9 -17 -20 -21 -23 -25 -26 -28 -29 -30 -31 -34 -35 -36 -38 -39 -40 -45 -54 -55 -59 -63 -64 -65 -66 -68 -69 -70 -74 -75 -85 -89 -92 -95
l=True

Введите 70 целых чисел: 95 91 89 87 82 81 80 75 74 73 72 66 62 59 56 54 51 49 48 47 43 39 35 34 32 31 28 26 16 11 10 9 -2 -3 -5 -8 -9 -17 -20 -21 -23 -25 -26 -28 -29 -30 -31 -34 -35 -36 -38 -39 -40 -45 -54 -55 -59 -63 -64 -65 -66 -68 -69 -70 -44 -75 -85 -89 -92 -95
l=False