Задача:"Описать процедуру, которая находит сумму последнего и предпоследнего элементов списка L, содержащего не менее 2х элементов. L->Э1/->Э2/->...Эn/nil."Вот судя по схеме нужно найти сумму Эn и Э(n-1) я правильно понял??И еще я не могу придумать алгоритм поиска. Я думаю что тут надо использовать двусвязный список или можно односвязным обойтись??
Rudolf, ну, если ты будешь использовать двухсвязный список - сама программка-то будет состоять из одной строки... Так что скорее всего - односвязный. Вот тут тебе придется подумать, как проходить по списку, чтобы не понадобилось возвращаться "назад"...
Вот вроде чет придумал:
Ну, еще бы оно не зависало... Ты же переменную P не изменяешь, она у тебя в одно и то же место указывает во втором цикле, и никогда не будет равна nil...
P.S. Кстати, это можно сделать и одним циклом...
p := L;
while p^.vol^.vol <> nil do p := p^.vol;
s := p^.number + p^.vol^.number;