Написать программу которая вводит последовательность вещественных чисел, состоящую из N элементов, и определяет, является ли эта последовательность возрастающей.

ПОМОГИТЕ ПОЖАЛУЙСТА! Спасибо.

//я так понимаю, речь идёт о монотонном возрастанииvar ar:array[1..10] of integer;i:integer;begin;for i:=1 to 10 doreadln(ar[i]);for i:=2 to 10 dobegin;if ar[i]<ar[i-1] thenbegin;writeln('Не возрастает');exit;end;end;writeln('Возрастает');end.