С. сформировать массив а с датчика случайных чисел целыми числами из интервала [-43, 32]. вывести элементы массива на экран. количество элементов массива задается с клавиатуры 1. сдвинуть массив на два элемента влево. 2. найти минимальный четный элемент массива, его номер(а) и количество. 3. поменять максимальный элемент массива местами с последним элементом. вывести получившийся массив на экран. 4. найти среднее арифметическое положительных элементов массива.
278
490
Ответы на вопрос:
Const nn = 50; var a: array[1..nn] of integer; b: array[1..10] of integer; { для номеров минимальных четных } n, i, km, min, max, t1, t2: integer; begin randomize; write('укажите количество элементов массива (не более 50): '); readln(n); writeln('исходный массив'); for i : = 1 to n do begin a[i] : = random(76) - 43; write(a[i]: 4); end; writeln; writeln('1. массив со сдвинутыми влево на 2 элементами'); t1 : = a[1]; t2 : = a[2]; for i : = 1 to n - 2 do begin a[i] : = a[i + 2]; write(a[i]: 4); end; a[n - 1] : = t1; a[n] : = t2; writeln(a[n - 1]: 4, a[n]: 4); writeln('2. минимальные четные элементы массива'); min : = 100; for i : = 1 to n do if (i mod 2 = 0) then if min > a[i] then begin min : = a[i]; km : = 1; b[km] : = i end else if min = a[i] then begin km : = km + 1; b[km] : = i end; write('значение: ', min, ', индексы: '); for i : = 1 to km do write(b[i]: 3); writeln; writeln('3. поменять местами максимальный и последний элементы массива'); max : = -100; for i : = 1 to n do if max < a[i] then begin max : = a[i]; b[1] : = i end; t1 : = a[b[1]]; a[b[1]] : = a[n]; a[n] : = t1; for i : = 1 to n do write(a[i]: 4); writeln; writeln('4. найти среднее арифметическое элементов массива'); t1 : = 0; for i : = 1 to n do t1 : = t1 + a[i]; writeln('среднее арифметическое равно ', t1 / n) end. тестовое решение: укажите количество элементов массива (не более 50): 30 исходный массив 31 -41 -18 -42 -15 -10 -8 -18 -30 21 -6 -43 -32 -18 -30 26 -37 20 29 18 26 21 29 22 -23 -43 29 30 -41 -9 1. массив со сдвинутыми влево на 2 элементами -18 -42 -15 -10 -8 -18 -30 21 -6 -43 -32 -18 -30 26 -37 20 29 18 26 21 29 22 -23 -43 29 30 -41 -9 31 -41 2. минимальные четные элементы массива значение: -43, индексы: 10 24 3. поменять местами максимальный и последний элементы массива -18 -42 -15 -10 -8 -18 -30 21 -6 -43 -32 -18 -30 26 -37 20 29 18 26 21 29 22 -23 -43 29 30 -41 -9 -41 31 4. найти среднее арифметическое элементов массива среднее арифметическое равно -5.4
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Alma8805.09.2021 20:50
-
Aika221622.06.2022 02:26
-
Vova7772303.10.2022 07:08
-
kuansh430.01.2023 08:00
-
Haranmeu17.09.2020 04:50
-
MrCapuchino07.06.2021 15:34
-
Гусяра22808.02.2021 02:40
-
0987mnbv25.05.2020 18:48
-
nyuta148802.03.2023 00:11
-
азамат12619.01.2021 06:01
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.