Question

Дан массив из 10 целых чисел. Напишите программу вычисления суммы элементов массива среди, трехзначных чисел, у которых последняя цифра четная, первая нечетная. Нужна программа срочно

Answer 1

Ответ:

program z1;

var a:array[1..10] of integer;

i,s:integer;

begin

s:=0;

write('Массив: ');

for i:= 1 to 10 do

begin  

a[i]:=random(1000);  

write(a[i],'  ');

if (a[i]>99) and (a[i]<1000) and (a[i] mod 10 mod 2 = 0) and (a[i] div 100 mod 2 <> 0) then s:=s+a[i]

end;

writeln;

write('Сумма элементов массива среди, трехзначных чисел, у которых последняя цифра четная, первая нечетная: ',s)

end.

Объяснение:

(a[i]>99) and (a[i]<1000) - проверка числа на трёхзначность

(a[i] mod 10 mod 2 = 0) - проверка последней цифры числа на чётность

(a[i] div 100 mod 2 <> 0) - проверка первой цифры числа на нечётность

все условия соединены and, т.к. должны выполняться одновременно

Answer 2

Конечно, вот программа на языке Python, которая вычислит сумму элементов массива, удовлетворяющих вашему условию:

pythonCopy code
# Исходный массив из 10 целых чисел (замените его на свой)
arr = [123, 456, 789, 246, 135, 802, 975, 369, 158, 753]

# Инициализируем переменную для суммы
total_sum = 0

# Проходим по элементам массива
for num in arr:
    # Проверяем, является ли число трехзначным и последняя цифра четной, а первая нечетной
    if 100 <= num <= 999 and num % 10 == 0 and (num // 100) % 2 != 0:
        # Если условие выполняется, добавляем число к сумме
        total_sum += num

# Выводим сумму
print("Сумма элементов, удовлетворяющих условию:", total_sum)

Просто замените массив arr на свой собственный массив из 10 целых чисел, и программа вычислит сумму элементов, удовлетворяющих вашему условию.