Склавиатуры вводится произвольное количество чисел n. определите количество (к) и сумму (s) положительных чисел, оканчивающихся на 6.запишите программу на любом языке программирования.

Пишу на QBasic
CLS
INPUT N
FOR I = 1 TO N 
PRINT "Введите число"
INRUT A
IF A>0 AND A MOD 10 = 6 THEN
K=K+1
S=S+A
END IF
NEXT I
PRINT K
PRINT S