![В таблице Dat хранятся данные о количестве сделанных заданий (Dat[1] заданий сделал первый ученик, D](/tpl/images/4438/5148/fdf8c.jpg)
Для того, чтобы последовательность была возрастающей, для каждого очередного элемента new и предыдущего old должно выполняться условие new > old. Любое нарушение данного условия приводит к тому, что последовательность не может быть возрастающей.
Program Sequence;
var old, new : real;
f : boolean;
begin