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

с Питоном. Составить программу, позволяющую в одномерном массиве, состоящем из N случайно заданных элементов, вычисляющую указанное ниже значение. . Варианты вычисляемых значений:
1) сумма модулей отрицательных элементов массива;
2) количество положительных элементов массива;
3) количество элементов массива, не принадлежащих интервалу (a, b);
4) произведение элементов массива, меньших десяти

👇
Ответ:
Sasha25rrtt
Sasha25rrtt
03.04.2022

как-то так

N = int(input('Кол-во элементов: '))

A = int(input('Начало интервала: '))

B = int(input('Конец интервала: '))

arr = [int(input()) for _ in range(N)]

sum_, countPos, countInt, comp = 0, 0, 0, 0

for i in arr:

 if i < 0:

   sum_ += abs(i)

 if i > 0:

   countPos += 1

 if i < A or i > B:

   countInt += 1

 if i < 10:

   if comp == 0:

     comp = i

   else:

     comp *= i

print(f'1. {sum_}\n2. {countPos}\n3. {countInt}\n4. {comp}')

4,5(58 оценок)
Ответ:
romsik1999
romsik1999
03.04.2022

Написал всё так же в одной программе.

Указываешь N, затем через пробел a и b, а после сам массив из N символов.

Всё красиво выведется.

Просто не увидел, что ответ уже пишут.

4,5(75 оценок)
Открыть все ответы
Ответ:
tsoikin77
tsoikin77
03.04.2022
Чтобы излишне не терять точность и не тратить лишнее время на вычисления, выведем рекуррентную формулу.
\displaystyle a_1= \frac{3}{2}; \\ \\ a_{i-1}=\frac{3^{i-1}\cdot (i-1)!}{[2(i-1)]!}; \\ \\ a_i=\frac{3^i\cdot i!}{(2i)!} = \frac{3\cdot3^{i-1}\cdot i\cdot(i-1)!}{2 i\cdot(2i-1)\cdot(2i)!}={ \frac{3i}{2i\cdot(2i-1)}\cdot a_{i-1}=\frac{3}{4i-2}\cdot a_{i-1}
В задании не сказано точно, как определять условие окончания суммирования. Примем, что суммирование завершается, если очередной член ряда не может изменить накопленную сумму больше, чем на ε, т.е.
|aₓ| ≤ ε.

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var (ai1,eps,s,i):=(3/2,0.001,3/2,2);
  while true do begin
    var a:=3/(4*i-2)*ai1;
    if Abs(a)>eps then begin i+=1; s+=a; ai1:=a end
    else Break
    end;
  Writeln('S = ',s:0:3)
end.

Результат
S = 2.532

Напишите программу для суммы числового ряда. дан числовой ряд и малая величина е(эпсила). найдите су
4,5(87 оценок)
Ответ:
khodha
khodha
03.04.2022
// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('*** Исходный массив ***');
  var a:=MatrRandom(4,4,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  var sn:=a.ElementsByRow.Where(t->t<0).Sum;
  Writeln('Сумма отрицательных элементов равна ',sn);
  var sd:=0;
  for var i:=0 to a.RowCount-1 do sd+=a[i,i];
  Writeln('Сумма элементов на главной диагонали равна ',sd);
end.

Пример
*** Исходный массив ***
  55 -36  70  19
  79  14   5  -5
  79  -9 -62  20
 -71  69 -34  66

Сумма отрицательных элементов равна -217
Сумма элементов на главной диагонали равна 73
4,7(29 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ