Question

Заполнить массив из 10 элементов случайными числами в интервале [-10..10] и найти в нем максимальный и минимальный элементы и их номера. Пример: Исходный массив: 4 -5 3 10 -4 -6 8 -10 1 0 максимальный a[4]=10 минимальный a[8]=-10

Answer 1

PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018

Внимание! Если программа не работает, обновите версию!

begin

 var a := ArrRandom(10, -10, 10);

 a.Println;

 var i := a.IndexMax;

 Writeln('максимальный a[', i + 1, ']=', a[i]);

 i := a.IndexMin;

 Writeln('минимальный a[', i + 1, ']=', a[i])

end.

-2 0 -3 0 3 -2 1 -9 -9 -2

максимальный a[5]=3

минимальный a[8]=-9

Answer 2

Вот пример кода на языке Python, который создает массив из 10 случайных чисел в интервале [-10, 10], находит максимальный и минимальный элементы, а также их индексы:

pythonCopy code
import random

# Создание массива из 10 случайных чисел в интервале [-10, 10]
array = [random.randint(-10, 10) for _ in range(10)]

# Нахождение максимального элемента и его индекса
max_value = max(array)
max_index = array.index(max_value)

# Нахождение минимального элемента и его индекса
min_value = min(array)
min_index = array.index(min_value)

# Вывод результатов
print("Исходный массив:", " ".join(str(x) for x in array))
print("Максимальный a[{}] = {}".format(max_index, max_value))
print("Минимальный a[{}] = {}".format(min_index, min_value))

Пример вывода:

lessCopy code
Исходный массив: 4 -5 3 10 -4 -6 8 -10 1 0
Максимальный a[3] = 10
Минимальный a[7] = -10

Обратите внимание, что индексы начинаются с 0, поэтому в выводе значение max_index соответствует индексу 3, а min_index соответствует индексу 7.