profile
Опубликовано 6 лет назад по предмету Информатика от gal2009

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

  1. Ответ
    Ответ дан v1248
    CLS
    N = 0
    DIM A(4, 7)
    DATA 51,22,33,44,-25,76,-87
    DATA 229,30,-81,882,43,84,85
    DATA 37,88,99,10,34,33,23
    DATA 34, 55, 66, -77, 86, 65, 32, 91
    FOR i = 1 TO 4
    FOR j = 1 TO 7
    READ A(i, j)
    PRINT A(i, j);
    IF A(i, j) < 0 THEN
    N = N + 1
    END IF
    NEXT j
    PRINT
    NEXT i
    PRINT
    PRINT "N ="; N

Самые новые вопросы