Составить блок схему и написать программу на языке программирования QBASIC. Дан двухмерный массив А из 4 строк и 7 столбцов. Найти количество отрицательных элементов массива. Кто понимает как решить помогите плиз!

CLS
N = 0
DIM A(4,7)
DATA51,22,33,44,-25,76,-87
DATA229,30,-81,882,43,84,85
DATA37,88,99,10,34,33,23
DATA34, 55, 66, -77, 86, 65, 32, 91
FOR i= 1 TO 4
FOR j =1 TO 7
READA(i, j)
PRINTA(i, j);
IF A(i,j) < 0 THEN
N = N +1
END IF
NEXT j
PRINT
NEXT i
PRINT
PRINT "N ="; N

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку