Найти и вывести разницу между сумой элементов двух матриц - QBasic

Формулировка задачи:

Помогите с програмой! Никак не могу решить((( Найти и вывести разницу R между сумой елементов матрицы Z(i,j)<7 и сумой елементов матрицы Z(i,j)>7 масива Z(3,4). Заранее спасиб!

Код к задаче: «Найти и вывести разницу между сумой элементов двух матриц - QBasic»

textual
DIM Z(3, 4)
FOR i = 0 TO 2
    FOR j = 0 TO 3
        Z(i, j) = INT(RND(1) * 10)
        IF Z(i, j) < 7 THEN s1 = s1 + Z(i, j)
        IF Z(i, j) > 7 THEN s2 = s2 + Z(i, j)
        PRINT Z(i, j);
    NEXT j
    PRINT
NEXT i
R = s1 - s2
PRINT "R="; R

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

12   голосов, оценка 4.250 из 5


СОХРАНИТЬ ССЫЛКУ