В одномерном массиве из N натуральных чисел вычислить сумму квадратов всех нечетных чисел
Нужна программа написания на Бэйсике. И блок схема.

Есть ответ
17.12.2022
306

Ответ


CLSINPUT "N"; NDIM A(N)FOR I = 1 TO N    INPUT "A"; A(I)NEXTFOR I = 1 TO N    IF A(I) / 2 INT(A(I) / 2) THEN        sum = sum + A(I) ^ 2    END IFNEXTPRINT sum


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.