формировать код,


формировать код, что операция добавления прошла успешно. Для этого будет использоваться переменная Code, значение которой будет равно 0. Если места для нового элемента в массиве нет, то значение переменной Code будет равно 1, что будет означать, что операция добавления элемента не выполнена из-за отсутствия места в очереди. Добавление нового элемента можно оформить в виде процедуры: Procedure InsQue (var q: Queue; var Free,First: integer; var Code: integer; x: real); begin if Free > maxqueue then begin Code:=1; {Очередь полна} exit; end; q[Free]:=x; Free:=Free+1; Code:=0; end Операция удаления элемента из очереди Remove может выполняться только в том случае, если очередь не пуста. Поэтому при удалении элемента из очереди прежде всего необходимо убедиться в том, что очередь не пуста. И лишь после этого можно удалять элемент очереди. Если ни одного элемента в массиве нет, то значение переменной Code будет равно 2, что будет означать, что операция удаления
Индекс
Элементарные функции    Линейные уравнения    Нелинейные уравнения    Случайные числа


Hosted by uCoz