n = 4
DIM A(n)
FOR i = 1 TO n
INPUT "vvedite element ", A(i)
NEXT
c = 0
FOR i = 1 TO n
IF A(i) = 32 THEN c = c + 1
NEXT
PRINT "Elementov so znach 32:"; c
Тестирование выполнено в программе QB64 ( Скачать )
n = 4
DIM A(n)
FOR i = 1 TO n
INPUT "vvedite element ", A(i)
NEXT
c = 0
FOR i = 1 TO n
IF A(i) = 32 THEN c = c + 1
NEXT
PRINT "Elementov so znach 32:"; c
Тестирование выполнено в программе QB64 ( Скачать )