FreePascal.ru

iskander, но после dispose я же присваиваю p := nil, и теперь next последнего элемента (бывшего предпоследнего) указывает как раз на р = nil.

Описание однонаправленного списка:
type
list = ^node;
node = record
elem: integer;
next: list;
end;
Пусть у нас есть список, L - ссылка на его голову. Я хочу удалить последний элемент списка. Вообще всегда это делается так:
if L^.next = nil then begin
dispose(L);
L := nil ...

Программа почему-то игнорирует команду readln(name); в 80 строчке (выделено красным) и просто не запрашивает ввод name. Free Pascal IDE version 1.0.12, compiler version 3.0.4, windows 10.

type
p = ^element;
element = record
r: integer; {row}
c: integer; {coloumn}
number: integer ...