Как вывести номер максимального элемента массива ??? (Паскаль)я написала программку, чтоб

Как вывести номер наибольшего элемента массива ??? (Паскаль)
я написала программку, чтоб найти максимальный элемент массива, но не знаю, как вывести его индекс
Вот программка по нахождению наибольшего элемента массива
program ma;
var i,max: integer;
a:array [1..10] of integer;
begin
writeln ('введите массив из 10 частей');
read (a[1]);
max:=a[1];
for i:= 2 to 10 do
begin
read(a[1]);
if a[1] gt; max then
max:=a[1];
end;
writeln (max);
end.

Kolja Kosk 2019-08-22 00:59:19

5 мин

Алёна Синдилевич 2019-08-22 01:06:42

мне в эту программку необходимо дописать действия по нахождению номера наибольшего элемента массива

Арсений Сморгович 2019-08-22 01:15:43

А эта задача делает тоже самое, кинь мою

Оксана Лайзис 2019-08-22 01:22:07

она рабочая