Найти наименьший из элементов, расположенных правее максимального элемента массива. вместо наименьшего элемента выводит последний. исправить. const n=10; var a: array[1..n] of integer; i,j,max,minp: integer; begin write('массив '); for i: =1 to n do begin a[i]: =random(100); write(a[i]: 4); end; writeln; write('максимальный элемент '); max: =0; imax: =0; for i: =1 to n do if (a[i]> max) then begin max: =a[i]; j: =i; end; writeln(max); minp: =0; for i: =j to n do if (a[i] minp: =a[i]; write('наименьший элемент правее максимального ',minp); end.

ттууппааяя ттууппааяя    3   01.10.2019 14:30    1

Ответы
diken1 diken1  09.10.2020 07:56

Заменить строки в конце программы:   minp:=max;

for i:=j to n do  

if (a[i]<minp) then minp:=a[i];

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика