Как вывести номер максимального элемента массива (паскаль) я написала программу, чтобы найти максимальный элемент массива, но не знаю, как вывести его индекс вот программа по нахождению максимального элемента массива 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] > max then max: =a[1]; end; writeln (max); end.

klymova2006oz080r    3   11.07.2019 05:30    2