Найти максимальный элемент численного массива и его индекс1.В переменной Amax текущее
Отыскать максимальный элемент численного массива и его индекс
1.В переменной Amax текущее наибольшее значение, а в Aindex- его позиция(индекс).
2. В программе можно выделить две части: заполнение массива числами с выводом их на экран (первый цикл for) и конкретно (2-ой цикл for)
3. Перед первым циклом запускается процедура randomize для того чтоб при каждом запуске программы значения массива были различными.
4.Вначале делятся догадки, что первый элемент массива и есть максимум. Потому переменной Aindex присваивается значение (т.е указатель на 1-ый элемент массива), Amax - конкретно значение, хранящееся в первой ячейке массива.
5. Начиная со второго элемента, каждое очередное значение массива сравнивается с текущим значением Amax. В случае если текущее значение массива больше чем хранящейся в Aindex происходит новое присваивание обоим переменным текущего значения и индекса.
Предлагаемый вариант программки лишен обозначенного выше изъяна.
const
nn=100; максимальное количество частей в массиве
var
a:array[1..nn] of integer;
i,n,Amax,Aindex:integer;
begin
Randomize;
Write('n='); Read(n);
for i:=1 to n do begin
a[i]:=Random(101)-50;
Write(a[i],' ')
end;
Writeln;
Aindex:=1;
for i:=2 to n do
if a[i]gt;a[Aindex] then Aindex:=i;
Amax:=a[Aindex];
Writeln('Наибольший элемент номер ',Aindex,' равен ',Amax)
end.
Пример
n=15
24 14 44 4 41 -50 14 3 7 38 21 -39 31 -2 12
Максимальный элемент номер 3 равен 44
-
Вопросы ответы
Статьи
Информатика
Статьи
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.
Математика.
Химия.