средства отладки программ в обьектно-ориентированном программированииdelphi

[Ирина Кирилова]

помогите пожалуйста решить задачу....
Дано n вещественных чисел. определить, образуют ли они возрастающую последовательность....
Заранее спасибо..

[Zer0]

var n,a1,a2,i:integer; isRaise:boolean;
begin
  isRaise:=true;
  readln(n);
  readln(a2);
  for i:=2 to n do begin
   a1:=a2;
   readln(a2);
   if a1>=a2 then begin
     isRaise:=false;
     break;
   end;
  end;
if isRaise then writeln ('возрастающая') else writeln ('не возрастающая');
end.

[Son Of Pain]

Все же условие проверки должно быть > , а не >= - последовательность же возрастающая, а не монотонно возрастающая )

И, казалось бы, при чем здесь средства отладки?

[Zer0]

возможно ТС просто скопировала тему учебного раздела, где требуется написать такую задачу и "отладить". пардоньте, если что не так