Top.Mail.Ru
Ответы
Аватар пользователя
10лет
Изменено
Аватар пользователя
Аватар пользователя
Аватар пользователя
Программирование
+3

Помогите решить задачу в QBasic

В массив А [N] включенны натуральные числа. Найти сумму элементов массива, кратных заданному K.

Дополнен

Надо составить программу решения задачи

По дате
По рейтингу
Аватар пользователя
Новичок
10лет

Ключевая часть:
S=0
for i=1 to N
if K*int(a(i)/K) = a (i) then
S= S + a(i)
endif
next i
На выходе S содержит искомую сумму. Не уверен, что во всех версиях есть оператор MOD, проще реализовать через int.

Аватар пользователя
Мудрец
10лет

Ключевая часть:
S=0
for i=1 to N
if A(i) MOD K = 0 then S= S + A[i]
Next i
S содержит искомую сумму.

Аватар пользователя
Оракул
10лет

поделите на К - получите новый массив. В нем суммируйте только целые. вот и всё)