Алгоритмическая оценка сложности:
О(2*2n) оценка сложности алгоритма.
Мы оптимизировали оценку до О(2*2n) с максимальной тяжелой оценки О(n*2n).
Текст программы:
program Spisok;
uses crt;
type TPSpisok=^TSpisok;
TSpisok=record
element:integer;
next:TPSpisok;
end;
var pbeg,pend,pv:TPSpisok;
qbeg,qend,qv:TPSpisok;
n,i,flag:integer;
BEGIN
clrscr;
new(pv);
write('Vvedite n: ');
readln(n);
pv^.element:=0;
pv^.next:=nil;
pbeg:=pv;
qbeg:=pv;
qend:=pbeg;
pend:=pbeg;
new(qv);
нет
нет