作业：
建立一个包含10个元素的数组，数组元素的值为{10，-1,11，-2,12，-3,13，-4,14，-5}。要求： 1、该数组的值从键盘依次输入，并显示。
2、计算该数组中所有元素的和，并显示。
3、计算该数组中所有正数的和，并显示。
4、计算该数组中所有负数的和，并显示。

Dim array(9) as Integer
Dim i,zs,fs,shu as Integer
zs=0
fs=0
shu=0
For i=0 to 9
Input array(i)
shu=shu+array(i)
If array(i)>0 Then zs=zs+array(i)
If array(i)<0 Then fs=fs+arrat(i)
Next i
For i=0 to 9
Print "数组第";i+1;"个元素是：";array(i)
Next i
Print "所有元素之和是";shu
Print "所有正数之和是";zs
Print "所有负数之和是";fs

不懂