Муниципальное автономное общеобразовательное учреждение муниципального образования город Краснодар
350047, город Краснодар, ул. Темрюкская 68
Приемная: (861)222-28-35
email: school16@kubannet.ru
ВКонтакте: https://vk.com/public206323474
Одноклассники: https://ok.ru/group/58470071795715
*Согласия субъектов персональных данных или их законных представителей, на размещение персональных данных в общем доступе на официальном сайте МАОУ СОШ №16 получены. Перепечатка материала возможна только при наличии активной ссылки на источник.
Program gory;
var
n,i,min1,min,x1,x2,x3,x4,y1,y2:integer;
u:boolean;
begin
readln(n);
min:=n;
for i:=1 to n do
begin
readln(y2);
if (y2>y1) then
begin
if y1<>0 then u:=true;
x1:=i
end else if (y2<y1) and (u=true) then
begin
u:=false;
min1:=i-x1;
write('----',min1,'---');
x2:=i
end;
if min1<min then
begin
min:=min1;
x3:=x1-1;
x4:=x2
end;
y1:=y2;
end;
write(min, 'x1=',x3,'; x2=', x4);