Сформулировать из 8 натуральных случайных чисел в диапазоне от -10 до 10.найти кол-во положительных элементов массива и их сумму- QBasic(Бейсик)

dim a(8)
print "massiv"
for i=1 to 8 
a(i)=int(rnd*21)-10
print a(i);
if a(i)>0 then kol=kol+1:s=s+a(i)
next
print
print"kolichestvo=";kol
print "summa=";s