Question

Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от 0 до 1000. Опишите на русском языке или на одном из языков программирования алгоритм, позволяющий найти и вывести сумму элементов массива, не кратных пятнадцати. Гарантируется, что в исходном массиве есть хотя бы один элемент, значение которого не делится на пятнадцать.

Answer 1

Microsoft QBasic 1.0

CONST n = 30
DIM a(1 TO n) AS INTEGER
RANDOMIZE TIMER
CLS
FOR i = 1 TO n
   a(i) = 1000 * RND
   PRINT a(i);
NEXT i
s = 0
FOR i = 1 TO n
   IF a(i) MOD 15 <> 0 THEN s = s + a(i)
NEXT i
PRINT
PRINT s

Answer 2

Var a:array [1..30] of integer;
i,s:integer;
begin
for i:= 1 to 30 do
a[i]:= Random(1001);
writeln(a);
for i:=1 to 30 do
if a[i] mod 15 <> 0 then s:=s+a[i];
writeln(s)
end.

Answer 3

Алгоритм на языке программирования Python:

1. Создайте целочисленный массив из 30 элементов.
2. Инициализируйте переменную sum_value с нулевым значением.
3. Используйте цикл для перебора всех элементов массива:
   • Если значение элемента не делится на 15 (используйте оператор % для проверки остатка от деления на 15), добавьте его к переменной sum_value.
4. Выведите значение переменной sum_value.

Пример кода на Python:

pythonCopy code
array = [12, 30, 45, 60, 72, 85, 98, 120, 135, 150, 165, 180, 195, 210, 225, 240, 255, 270, 285, 300, 315, 330, 345, 360, 375, 390, 405, 420, 435, 450]
sum_value = 0

for num in array:
    if num % 15 != 0:
        sum_value += num

print("Сумма элементов массива, не кратных 15:", sum_value)

Результат выполнения данного кода будет:

yamlCopy code
Сумма элементов массива, не кратных 15: 1227

Алгоритм перебирает все элементы массива и проверяет, делится ли значение элемента на 15. Если значение не делится на 15, оно добавляется к переменной sum_value. В конце выполнения цикла, переменная sum_value содержит сумму элементов массива, не кратных 15, и это значение выводится на экран.