利用线性表List的基本运算，设计一个在线性表A中删除线性表B中出现的元素的算法。

为了在线性表A中删除线性表B中出现的所有元素，我们可以采用以下步骤设计算法：

1. **初始化**：
- 创建两个指针`pA`和`pB`，分别指向线性表A和B的头部。
- 初始化计数器`count`为0，用于记录已删除的元素个数。

2. **遍历**：
- 当`pB`不为空时，执行循环：
- 检查`pA`指向的元素是否等于`pB`指向的元素：
- 如果相等，则将`A`中的这个元素删除，并增加`count`。
- 更新`pA`指向下一个元素（如果存在）。
- 将`pB`指向`B`的下一个元素（如果存在）。

3. **移动A的剩余部分**：
- 遍历完成后，`pA`可能未到达列表尾部，因为已经删除了若干个元素。所以需要将`pA`后的所有元素向前移位，直到`pA`或`pB`都为空。

4. **结束条件**：
- 返回删除元素的数量`count`以及更新后的线性表A。

以下是伪代码表示：

function deleteElements(A, B):
    pA = A.head
    pB = B.head
    count = 0

    while pA and pB:
        if pA.data == pB.data:
            remove(pA)  # 删除A中的元素
            count += 1
            pA = A.nextAfter(pA)  # 移动A指针
        else:
            pB = B.next(pB)

    # 移动A剩余部分
    while pA:
        A.prev(pA).next = pA.next
        if pA.next:
            pA.next.prev = pA.prev
        pA = A.next(pA)
    
    return count, A