Дан массив, состоящий из 15-ти целых чисел, найти минимально из них и заменить его на сумму первого
элемента и последнего.Ответы на вопрос
var
A: array [1..15] of Integer;
i, Amin, Ai: Integer;
begin
WriteLn ('Массив:');
Randomize;
for i := Low (A) to High (A) do begin
A [i] := Random (100); // заполнение массива случайными значениями
Write (A [i], ' '); // вывод для просмотра
end;
Amin := A [Low (A)]; // минимальное значение возьмем из первого элемента массива
Ai := Low (A); // индекс минимального значения = 1
for i := Low (A) + 1 to High (A) do begin // цикл со второго элемента массива до последнего
if A [i] < Amin then begin // если найден элемент меньше минимального
Amin := A [i]; // изменяем его значение
Ai := i; // и сохраняем номер
end;
end;
Writeln;
Writeln ('Минимальный элемент № ', Ai, ' равный ', A [Ai]); // выводим минимальный элемент на просмотр
A [Ai] := A [Low (A)] + A [High (A)]; // изменяем на сумму первого и последнего
Writeln ('Заменен на значение = ', A [Ai]); // и его новое значение на просмотр
end.
Давайте предположим, что у вас есть массив из 15 целых чисел на языке программирования, например, на Python. Вот пример кода, который реализует указанные вами шаги:
python# Ваш массив из 15 целых чисел
my_array = [5, 8, 12, 3, 7, 15, 9, 4, 6, 10, 1, 11, 14, 2, 13]
# Найти минимальное число в массиве
min_value = min(my_array)
# Найти индекс минимального числа
min_index = my_array.index(min_value)
# Заменить минимальное число на сумму первого и последнего элементов
my_array[min_index] = my_array[0] + my_array[-1]
# Вывести измененный массив
print(my_array)
Этот код найдет минимальное число в массиве, затем заменит его на сумму первого и последнего элементов, и выведет измененный массив. Пожалуйста, убедитесь, что в вашем языке программирования использование min(), index(), и индексация массивов происходит аналогичным образом.
Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili
