
Заполнить массив 20 случайными числами (использовать генератор случайных чисел). Найти в массиве
максимальный элемент и вывести на экран его значение и порядковый номер в массиве.

Ответы на вопрос

uses crt; var arr:array[1..20]ofinteger; max,q,maxq:integer; beginwriteln('ARRAY: '); for q:=1to20do begin arr[q]:=random(80); writeln(q:2,arr[q]:6); end; max:=arr[1]; for q:=2to20do if arr[q]>max then begin max:=arr[q]; maxq:=q; end; writeln; write('MAX = ',max,' (П. НОМЕР ',maxq,')'); end.



Для решения данной задачи можно воспользоваться следующим алгоритмом: 1. Создаем массив с размерностью 20. 2. Используя генератор случайных чисел, заполняем массив случайными значениями. 3. Инициализируем переменные max_value и max_index значениями первого элемента массива. 4. Проходим по всем элементам массива, начиная со второго. 5. Для каждого элемента, сравниваем его значение с текущим максимальным значением. - Если текущий элемент больше max_value, обновляем значения max_value и max_index. 6. После прохода по всем элементам, выводим на экран максимальное значение и его порядковый номер.
Пример реализации данного алгоритма на языке Python:
```python import random
# Создание массива arr = [0] * 20
# Заполнение массива случайными значениями for i in range(len(arr)): arr[i] = random.randint(0, 100)
# Инициализация переменных max_value = arr[0] max_index = 0
# Поиск максимального элемента и его индекса for i in range(1, len(arr)): if arr[i] > max_value: max_value = arr[i] max_index = i
# Вывод максимального элемента и его индекса на экран print("Максимальный элемент:", max_value) print("Порядковый номер в массиве:", max_index) ```
После выполнения данного кода на экран будет выведено максимальное значение элемента массива и его порядковый номер.


Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili