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

1kukukukuku 1kukukukuku    2   02.04.2019 06:50    0

Ответы
нурбо1 нурбо1  28.05.2020 10:23

CLS
INPUT "N"; N
DIM A(N)
FOR I = 1 TO N
    INPUT "A"; A(I)
NEXT
FOR I = 1 TO N
    IF A(I) / 2 <> INT(A(I) / 2) THEN
        sum = sum + A(I) ^ 2
    END IF
NEXT
PRINT sum

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика