Цитата:
|
Сообщение от kaizer131
...
”Дан стек, элементами которого являются действительные числа. Сформировать структуру данных очередь, в которую включить значения тех элементов из стека, которые не превосходят uz. Элементы с найденными значениями из стека исключить. А также получить:
(uz+r)/(uz+s),
где
r- сумма всех тех значений элементов, которые не превосходят u,
s- сумма значений элементов, больших u.”
Реализовать нужно без динамических массивов, только очереди и стеки.
Ниже привожу свой код, укажите на ошибки.
|
Пара вопросов:
- На какой Delphi проходит обучение?
- Можно ли пользоваться классами?
У Тебя в секции type объявлены только элементы стека или очереди ( причем одинаковые ).
У самих стеков или очередей должны быть реализованы минимум 3 метода - Push, Pop, Peek. Которые описываются в классах, а в последних версиях Delphi можно и в структурах.