Есть ответ 👍

Дан массив размера n. найти минимальный из его локальных максимумов (локальный максимум – это элемент, который больше любого из своих соседей).

238
458
Посмотреть ответы 2

Ответы на вопрос:


Program z1;   var a: array [1..1000] of integer;       b: array [1..1000] of integer; i,j,n,min,m: integer; begin  write('введите размер массива - ');   readln(n);   randomize;   for i: =1 to n do  begin    a[i]: =random(50)-0;     write (a[i],' ');   end;       j: =1;   for i: =2 to n-1 do  begin    if ((a[i]> a[i-1]) and (a[i]> a[i+1]))      then begin            b[j]: =a[i];             j: =j+1;             end;   end;       m: =j-1;   writeln;   for j: =1 to m do    write (b[j],' ');       min: =b[1];   for j: =2 to m do    if (b[j]< min) then min: =b[j];       writeln;   writeln(min);       end.

2290, то есть 2 тысячи

Объяснение:

НЕ Попов И Радио = 3550

Попов И Радио = 2290

Попов И Радио = Радио И Попов

Не Радио И Попов = 470

Популярно: Информатика