Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
ekaterinapsncen
10.08.2020 11:13 •
Информатика
Ввести массив, состоящий из 12 элементов целого типа. получить новый массив, заменив значение пятого элемента среднеарифметическим исходного массива
Показать ответ
Ответ:
masakahdksa
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 оценок)
Популярные вопросы: Информатика
maksim9182
27.03.2022 06:50
Какой алгоритм следует использовать для создания рисунка с повторяющимся узором?...
Фарид55
23.11.2022 06:54
Звездный треугольник Напишите программу, которая выводит указанный треугольник, состоящий из звездочек (*).Sample Input:Sample Output:* ** *** Напишите программу. Тестируется...
Graffiti1337
27.02.2021 20:49
Большой мотор EV3 является более мощным, чем средний мотор EV3. Это происходит за счет наличия в большом моторе EV3 редуктора. Редуктор является набором шестеренок и позволяет...
KiviPlayYT
06.12.2021 04:21
Что означает знак // в информатике? 1)Деление чисел2)Остаток отделения3)Целая часть От деления4)Возвести в степень...
anastasiykucher
19.07.2021 08:00
Задача мовою програмування Python (В гонці беруть участь 2 автомобілі. Швидкість кожного з них v1 і v2 відповідно. Щоб завершити гонку треба проїхати 15 км. Через кожне коло...
мустафа15
20.04.2020 12:03
Решить паскаль √2,5 -cos3,5- |sin1|...
сашмяу
07.02.2023 08:07
Администротирование локальной компьютерной сети , мне нужно ОПРЕДЕЛЕНИЕ ПРОСТЫМИ СЛОВАМИ (желательно не 2-3 слова, а как минимум 2 предложения) , не из ответом mail ru ....
Sveto4ka342
06.04.2023 14:43
Опешите цветную модель RGB...
0Peppa0
18.09.2022 12:10
Мәщір жолдағындағы батырмалардың атауларын қазақ жәнеорыс тіліндерінде аударып, дәптерге жаз...
андрей2096
05.02.2020 01:31
1)Какая функция в питоне,возращает целое число в заданном диапозоне2)Какая функция ,возрашяет время в секундах с начала епохи...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Внимание! Если программа не работает, обновите версию!
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