Código Delphi [-] type puntlista = ^Tnodo; Tnodo=Record P1:real; Rs1:real; link : puntlista; end;
type puntlista = ^Tnodo; Tnodo=Record P1:real; Rs1:real; link : puntlista; end;