int ListDelete(Sqlist &L, int p,int &e)
{
    int i;
    if(p<1||p>L.length) return 0;


    e=L.data[p];


    for(i=p;i<L.length;i++)
        L.data[i]=L.data[i+1];
    --(L.length);
    return 1;
}