Составить блок-схему алгоритма и программу на алгоритмическом языке программирования БЕЙСИК обработки одномерного массива. Заполнение массива элементами организовать путем ввода с клавиатуры. В одномерном массиве из N натуральн...
Составить блок-схему алгоритма и программу на алгоритмическом языке программирования БЕЙСИК обработки одномерного массива. Заполнение массива элементами организовать путем ввода с клавиатуры. В одномерном массиве из N натуральных чисел вычислить сумму удвоенных четных чисел.
Гость
Ответ(ы) на вопрос:
ГостьCLS
INPUT "N=", N
DIM M(100)
S = 0
FOR i = 1 TO N
PRINT "M(" + STR$(i) + ") =";
INPUT M(i)
IF M(i) \ 2 = M(i) / 2 THEN
S = S + 2 * M(i)
END IF
NEXT i
PRINT "S="; S
Не нашли ответ?
Похожие вопросы