Задан массив A из 13 элементов(2,13,-21,32,7,11,9,-5,4,-15,21.8.3)определить сумму всех элементов,которые больше числа 10 и найти количество положительных.Язык QBASIK

DATA 2,13,-21,32,7,11,9,-5,4,-15,21,8,3DIM a(1 TO 13) AS INTEGERs = 0: k = 0FOR i = 1 TO 13   READ a(i)   IF a(i) > 10 THEN s = s + a(i)   IF a(i) > 0 THEN k = k + 1NEXT iCLSPRINT "S="; s; ", kol-vo polozhitelnykh="; kРезультатS= 77 , kol-vo polozhitelnykh= 10