В одномерном массиве из N натуральных чисел вычислить сумму квадратов…

Question

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

Answer 1

36

yadigital

27 февраля 2023

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

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить