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

Ввести массив, состоящий из 12 элементов целого типа. получить новый массив, заменив значение пятого элемента среднеарифметическим исходного массива

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

Ответ:

ЯнаКиска

27.08.2020 01:09

PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018
Внимание! Если программа не работает, обновите версию!

begin
var a:=ArrRandom(12,-50,50); a.Println;
var b:=a.Select(t->real(t)).ToArray;
b[4]:=a.Average; b.Println;
end.

Пример
3 -37 -3 13 33 27 -31 42 -34 16 -34 44
3 -37 -3 13 3.25 27 -31 42 -34 16 -34 44

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

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

Barcelona2004

07.06.2021 00:35

Файл размером 64кб передается через некоторое соединение со скоростью 1024 бита в секунду.определите размер файла (в кб),который можно передать за то же время через другое...

Gear228man

13.02.2021 17:00

На компакт- диске объёмом 600 мбайт размещён фотоальбом, каждое фото в котором занимает 500 кбайт. сколько времени займёт просмотр всех фотографии, если на просмотр одной...

valeroon16

30.11.2022 16:33

9класс тест по теме хранение и обработка информации в базах данных. введите фамилию и имя: , с ! 1. одним из основных типов информационных структур логическая. база данных....

98675423

10.03.2023 17:46

Первые 20 чисел натурального числового ряда в двоичной, восьмеричной, шестнадцатеричной системах счисления...

Metyakarimi

24.04.2022 01:55

Вкоробке находятся 16 игрушек, среди них 4 зайца, 2 медведя. сколько битов информации содержится в сообщении о том, что из коробки достали игрушку зайца, а затем игрушку медведя,...

Love1963sss

24.04.2022 01:55

1группа студентов пришла в бассейн, в котором 4 дорожки для плаванья. сколько информации получат студенты из сообщения, что занятия будут проходить на дорожке №3? ответ: 2...

SashkaFlavki

20.02.2020 16:54

Сколько раз встречается цифра 2 в записи первых 10 чисел (начиная с 1) в системе счисления с основанием 4?...

LadyBoy357

15.01.2022 14:08

Что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; begin k: =0; s: =6; while k 605 do begin s: =s+30; k: =k+3; end; write(s+k); end....

alexxpopovruu

15.01.2022 14:08

Как называется версия протокола ip, в которой адрес устройства кодируется как 128-битовое число?...

Kat11166

18.04.2021 10:43

Длины сторон треугольник равны a , b , с .если треугольник равносторонний ,то найти его площадь.если треугольник равнобедренный ,то найти периметр и угол между равными сторонами....

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

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