Найти наибольший элемент массива и его порядковый номер - Turbo Pascal
Формулировка задачи:
Помогите пожалуйста
Вычислить на ЭВМ наибольший элемент массиваи его порядковый номер;. Проверить правильность программы на тесте при n=3 и следующих элементах массива(1.5, 4.3, 2.4). При выполнении задания необходимо использовать прием нахождения наибольшего. Для этого перед циклом следует задать начальное значение наибольшего, равное первому элементу массива, а в цикле сравнить наибольший с текущим элементом массива; в том случае, если текущий элемент больше наибольшего из предыдущих, то считать его наибольшим. Для нахождения порядкового номера наибольшего элемента массива необходимо перед циклом задать его начальное значение, равное 1, а в цикле всякий раз, когда текущий элемент массива больше наибольшего, считать номером наибольшего номер текущего элемента массива. Схема алгоритма решения представлена на рис.5.1. Блок 2 осуществляет ввод значения n и массива X, состоящего из n элементов. Блок 3 задает начальные значения . Блок 4 организует цикл, перебирающий элементы массива, начиная со второго и кончая n-ым . Блоки 4 и 5 находят наибольший элемент массива и его порядковый номер. Блок 7 за циклом выводит результаты на печать.
B(50) | определить максимальный элемент массива B и его порядковый номер |
xi > 0 |
Решение задачи: «Найти наибольший элемент массива и его порядковый номер»
textual
Листинг программы
uses Crt; const n=3; var i,j:integer; max:real; a:array [1..n] of real; begin ClrScr; writeln('Введите массив: '); for i:=1 to n do read(a[i]); writeln('Ваш массив: '); max:=a[1]; j:=1; for i:=1 to n do begin write(a[i]:0:1,' '); if a[i]>max then begin max:=a[i]; j:=i; end; end; writeln; writeln('max= ',max:0:1,' номер max= ',j); readln; readln; end.
Объяснение кода листинга программы
Этот код написан на языке Turbo Pascal и выполняет следующие действия:
- Объявляет необходимые переменные: n (количество элементов в массиве), i (индекс внутреннего цикла), j (индекс внешнего цикла), max (максимальное значение элементов массива), a (массив для хранения введенных пользователем значений).
- Запрашивает у пользователя ввести массив из n элементов.
- Считывает n элементов массива и сохраняет их в соответствующих переменных.
- Инициализирует переменную max значением первого элемента массива (a[1]).
- Инициализирует переменную j значением 1, так как это начальный индекс внешнего цикла.
- Запускает внешний цикл от 1 до n. На каждой итерации внутреннего цикла считывает значение текущего элемента массива и сравнивает его с текущим максимальным значением. Если текущий элемент больше максимального, обновляет значения переменных max и j.
- Выводит на экран массив, начиная с индекса 1 и заканчивая последним элементом.
- Выводит на экран максимальное значение и его порядковый номер.
- Завершает работу программы.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д