JD* dlbjl(int a[],int n)
{
	JD *s,*h;
	int i;
	h=(JD*)malloc(sizeof(JD));
	h->data=0;
	h->link=NULL;
	for(i=n;i>0;i--)
	{s=(JD*)malloc(sizeof(JD));
	 s->data=a[i-1];
	 s->link=h->link;
	 h->link=s;
	}
	return (h);
}