用指针帕斯卡形成单词的程序.找不到错误



我写了一个程序来用指针和动态数据结构来形成单词

但它不起作用并在第 19 行显示错误(元素未在指针类型中声明)请帮我完成它。我将不胜感激

program pointers;
type
  zv = ^pointer;
  pointer = record
    element : char;
    next : zv;
  end;
var
  vlan : zv;  {separate element}
  vslov : zv;  { pointer for word }
  symbol : char;
begin
  readln(symbol);
  new(vslov);
  vslov^.element := symbol;
  vslov^.next := nil;
  vlan := vslov;
  while symbol <> '.' do
    begin
      read(symbol);
      new(vlan^.next);
      vlan := vlan^.next;
      vlan^.element := symbol;
      vlan^.next := nil;
    end;
end.

pointer是预定义的类型名称。它是用于表示非类型指针的类型。所以zv是指向指针的指针。而预定义的类型pointer不是记录,因此不能与成员访问运算符一起使用.

通过为记录类型选择其他名称来解决问题。