int pop (struct pino *p)
    {
        if (p->top == 0)
        {
            printf ("\n\aPinon alivuoto");
            exit (1);
        }
        p->top--;
        return p->stck[p->top];
    }