一个连表

Question

Relaynode=record
     relaycounts:integer;
     device_number:string;
     ^next:relaynode;
     end;
错在那里？

Answer 1

Relaynode=record;Relaynode=record
     relaycounts:integer;
     device_number:string;
     ^next:relaynode;
     end;

Answer 2

Relaynode=record;
 type
   Relaynode=record
     relaycounts:integer;
     device_number:string;
     ^next:relaynode;
     end;
不对啊！找不到pascal的书了。

Answer 3

Relaynode=record
     relaycounts:integer;
     device_number:string;
     next: ^relaynode;
     end;

Answer 4

呵呵！type 肯定试药的
试过 了，不行

Answer 5

type Relaynode=record;
type
   Relaynode=record
     relaycounts:integer;
     device_number:string;
     next:^relaynode;
     end;

Answer 6

to hkbarton(宁静至远||淡泊明志) 
试过 了，不行