下列是一个体操评分程序。设满分为10分，20位评委，除去一个最高分和一个最低分，计算平均分。
Private Sub Command1_Click()
Max=0
Min=10
For i=1 To 20
n=Val(InputBox("请输入分数"))
If n＞Max Then Max=n
If n＜Min Then Min=n
s=s+n
______
s=s-Min-Max
p=s/18
Print "最高分"; Max; "最低分"; Min
Print "最后得分: "; p
End Sub

意象主要包括（）。

A、心理意象

B、内心意象

C、泛化意象

D、再生意象