С. сформировать массив а с датчика случайных чисел целыми числами из интервала [-43, 32]. вывести элементы массива на экран. количество элементов массива задается с клавиатуры 1. сдвинуть массив на два элемента влево. 2. найти минимальный четный элемент массива, его номер(а) и количество. 3. поменять максимальный элемент массива местами с последним элементом. вывести получившийся массив на экран. 4. найти среднее арифметическое положительных элементов массива.
166
433
Ответы на вопрос:
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
правильным ответом будет
36
не сомневайся это правильно
удачи
и можно лучшим ответом
Популярно: Информатика
-
Bakha11113.02.2021 17:02
-
Sam22322503.10.2022 17:03
-
Anorwen01.03.2021 15:22
-
retrovaweforyou08.06.2023 23:36
-
anastasia73839328.06.2023 04:40
-
MyNyanKet24.05.2021 21:36
-
alyonavasnecova3405.11.2020 19:50
-
вротмента04.04.2021 06:44
-
eka44559022613.10.2022 12:05
-
lipaalexandrova28.08.2021 22:08