有BASIC程序，10个数以递减次序排好放在数组中，由键盘输入一个数，查找此数是否在该数组中，如果是输出“YES”，不是输出“NO”。

10 N=10

20 DIM A（N）

30 FOR I=1TON

40 READ A（I）

50 NEXT I

60 X1=1：X2=N

70INPUT“X=”；X

80 P=

90 IF X=A（P） THEN PRINT “YES”：GOTO 150

100 IF THEN ：GOTO 120

110 X2=

120 IF X2＞X1 THEN 80

130 PRINT “NO”

140 DATA 95 ，86，78，70，63，57，48，39，20，10，

150 END