Question

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

Answer 1

Пишу на 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