Войти Регистрация Спроси ai-bota

Необходимо написать программу в Паскале Записать пять первых положительных элементов массива
Х=(х1,…,х12) подряд в массив Y=(y1,у2,…,у5). Вычислить среднее
геометрическое значение элементов массива Y.

Показать ответ

Ответ:

mariainbox303

19.08.2020 01:46

// PascalABC.NET

begin

var a := ArrRandom(12, -10, 30);

a.Println;

var y := a.Where(p -> p > 0).Take(5).ToArray;

var n := y.Length;

Print(y.Product ** (1 / n))

end.

Необходимо написать программу в Паскале Записать пять первых положительных элементов массива Х=(х1,…

0,0(0 оценок)

Популярные вопросы: Информатика

mylifeartem

30.04.2022 15:48

:в каждой группе найдите лишнее словосочетание(слово) и удалите его: клавиатура, джойстик, сканер, принтер монитор, графопостроитель, принтер, мышь. жёсткий диск, flash-память,...

сабина419

24.12.2020 02:30

1.дана последовательность n целых чисел, записанных в первый столбец(a1…an). определить, является ли она возрастающей. 2.даны два целых числа a и b (a b). вывести в порядке возрастания...

sig46dg

03.09.2021 23:43

Составьте блок схему алгоритма и программу подсчета количества чисел кратныx 7. числа вводятся с клавиатуры (признак окончания ввода число 0 ) язык паскаль желательно сделать на...

Кэти305

03.09.2021 23:43

Найдите и выведите на экран все двузначные числа, сумма цифр которыx не меняется при умножении на 2. (например, 27 и 27*2=54, сумма цифр чисел 27 и 54 равна 9) язык программирования...

B8888

23.03.2022 17:02

1. зачеркни справа 2. возведи в квадрат первая из них удаляет крайнюю правую цифру числа на экране, вторая — возводит число во вторую степень. составьте алгоритм получения из числа...

HydRarGyrUm74

03.12.2022 18:55

Складіть блок-схему алгоритму знаходження суми чисел перше з яких дорівнює 7 кожне наступне на 5 більше від попереднього і всі вони не перевищують 100 виконати алгоритм...

Лешик2005

22.04.2022 19:17

Определите значение переменной а после выполнения фрагмента программы: а=10 b=3 if a b: b+=12 Else: a-=7 if a b: a+=12 Else: a-=7...

05багира

21.12.2021 07:05

Одинаковая ли сила тяжести действует на камень, лежащий а) на берегу б) на дне реки?...

Falzy

25.04.2023 11:07

Найди 9 слов на тему сердце.( по горизонтали, по вертикали, по диагонали) вфсемикроб оотходыекн анюторирлс кислородас дяешьфвзлмо строьмекос вударыонку асепульсор...

burakova1985200

24.09.2022 17:19

1. 50 м жасыл орман 1 сағаттың ішінде бір адам сол сағатта тыныс алғанда шығаратын 40 г көмірқышқыл газын жұтатыны белгілі.1 га жасыл орман 1 сағатта қанша көмірқышқыл газын жұтады?Осынша...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку