Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Zemoten
08.11.2022 20:35 •
Информатика
Вмассив d(8), заполненный случайными числами, вставить посередине число 5. программа паскаль
Ответ:
ataev0512
16.08.2020 18:01
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!
begin
var d:=ArrRandom(8,-50,50); d.Println;
d:=(d[:4]+Arr(5)+d[4:]).ToArray; d.Println
end.
Пример
16 25 -2 45 50 6 -29 43
16 25 -2 45 5 50 6 -29 43
0,0
(0 оценок)
Популярные вопросы: Информатика
Чикама
22.06.2022 07:02
НУЖНО СДЕЛАТЬ Посмотри внимательно на описания. Как называются системы счисления, о которых идет речь? Какая из систем счисления в данном случае является лишней и почему (1 предложение)?...
Kaatja170
02.12.2021 11:48
program task; var n, i, power, copy: integer; flag: boolean; begin readln( n ); copy := n; i := 2; flag := false; while copy 1 do begin while copy mod i 0 do i := i + 1; power...
omon3565
15.11.2020 12:59
Запиши программу на языке Паскаль. Вывести на экран числа от 4 до 24 в обратном порядке. var i: integer; begin for i:= downto do writeln( ); readln; end....
kira1321
02.08.2021 12:32
Написать программы с объяснением (pascalabc), нужно.. №1. дан целочисленный двумерный массив, размерности nхm. выяснить в какой строке последовательность является возрастающей...
denholopДанила23231
01.07.2021 23:57
Как решить? ответ 4,но не могу понять ...
Мурад1001
22.03.2020 05:08
Какой цвет будет иметь точка, имеющая координаты (10, 10, 10) в модели rgb?...
yaarichek
18.02.2023 05:14
Написать программу, которая выводит на экран значение функции у = 2х(в квадрате)-5х-8 при x=-2, -1, 0, 1, 2...
logvlad9
04.12.2021 15:20
1) укажите видимые различия поверхности земли и луны. 2) объясните, чем вызваны эти различия....
Nastykissa
04.12.2021 15:20
Решите . для ремонта квартиры требуется 68 рулонов обоев.сколько пачек обойного клея нужно купить,если одна пачка клея рассчитана на 8 рулонов?...
Aituar2007
04.12.2021 15:20
Решить в виде уравнения: за двое суток на заводе выплавили 8.430 тонн стали.в первые сутки выплавили в 2 раза больше стали,чем во вторые.сколько стали выплавляли в каждые сутки?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var d:=ArrRandom(8,-50,50); d.Println;
d:=(d[:4]+Arr(5)+d[4:]).ToArray; d.Println
end.
Пример
16 25 -2 45 50 6 -29 43
16 25 -2 45 5 50 6 -29 43