Задан массив А(16), который содержит случайные целые числа в интервале [-33;17]. Найти мах элемент
и его место в массиве.Ответы на вопрос
const
n=16;
var
a:array [1..n] of integer;
max,i,maxi:integer;
begin
max:=-34;
for i:=1 to n do
begin
a[i]:=random(51)-33;
write(a[i]:4);
if a[i]>max then
begin
max:=a[i];
maxi:=i;
end;
end;
writeln;
writeln('Max:', max, ' MaxI:',maxi);
end.
Для решения этой задачи можно использовать следующий алгоритм:
Инициализируйте переменные
max_elementиmax_indexсо значениями первого элемента массиваAи его индекса соответственно. Предположим, что первый элемент массива является максимальным.Пройдитесь по оставшимся элементам массива
A, начиная с индекса 1:- Если текущий элемент больше значения
max_element, обновитеmax_elementиmax_indexсоответствующим образом.
- Если текущий элемент больше значения
После завершения цикла,
max_elementбудет содержать максимальный элемент массиваA, аmax_indexбудет содержать его индекс.Выведите значение
max_elementиmax_index.
Ниже приведена реализация данного алгоритма на языке Python:
pythonimport random
# Создание случайного массива
A = [random.randint(-33, 17) for _ in range(16)]
# Инициализация переменных
max_element = A[0]
max_index = 0
# Поиск максимального элемента и его индекса
for i in range(1, len(A)):
if A[i] > max_element:
max_element = A[i]
max_index = i
# Вывод результатов
print("Максимальный элемент:", max_element)
print("Индекс максимального элемента:", max_index)
После выполнения этого кода вы получите максимальный элемент массива A и его индекс.
Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili
