М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
ROLBER
ROLBER
25.08.2021 14:16 •  Информатика

Данные цели положительные числа N, K, M, a1, …, aN. Определить сумму и произведение членов последовательности a2, a4, .., aN не кратно K и кратных M.

👇
Ответ:
kharchenko219633
kharchenko219633
25.08.2021

язык программирования python

summ = 0

pro = 0

first = True

N = int(input('Введите N: '))

K = int(input('Введите K: '))

M = int(input('Введите M: '))

str_A = input('Введите последовательность a через пробел: ').split()

A = [int(item) for item in str_A]

for i in range(1, N + 1, 2):

   if A[i] % K != 0 and A[i] % M == 0 and first:

       first = False

       summ = A[i]

       pro = A[i]

   elif A[i] % K != 0 and A[i] % M == 0 and not(first):

       summ += A[i]

       pro *= A[i]

print('Сумма: ' + str(summ))

print('Произведение: ' + str(pro))

4,6(18 оценок)
Открыть все ответы
Ответ:
SonicAndDash
SonicAndDash
25.08.2021

ответ: y = 10

Объяснение:

Рассмотрим последовательность команд: 11112

Была применена 4 раза команда 1, то есть +7. То есть было четыре раза прибавлена семерка.

Найдем каким стало число после 4ех команд (4 раза прибавить 7):

2 + (4 * 7) = 30

Далее была произведена 2 команда, то есть 30 умножили на какое-то неизвестное y.

Мы знаем, что после 5ой и последней команды число стало 300, то есть мы с легкостью может найти y, решив простое уравнение (число после применения 4ой команды умножить на y равняется итоговому - 300):

30 * y = 300

Очевидно, что у = 10.

4,4(2 оценок)
Ответ:
ilike1
ilike1
25.08.2021

1.

program z1;

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

i,k:integer;

begin

write ('Введите элементы массива через пробел и нажмите Enter ');

for i:=1 to 10 do read (a[i]);

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

for i:=1 to 10 do write (a[i],'  ');

writeln;

write ('Номера элементов больше 5: ');

for i:=1 to 10 do if a[i] > 5 then

begin

write (i,'  ');

k:=k+1

end;

writeln;

writeln ('Элементов больше 5: ',k)

end.

2.

program z2;

var s:string;

begin

readln (s);

while pos('о',s)<>0 do delete(s,pos('о',s),1);

writeln(s)

end.

Объяснение:

Смотри картинки

2. Программа удаляет только строчные русские о


НУЖНА ЗАДАЧА: Составить программу на Паскале для обработки одномерного массива из 10 элементов. Знач
НУЖНА ЗАДАЧА: Составить программу на Паскале для обработки одномерного массива из 10 элементов. Знач
4,4(6 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ