Начало
Соревнования
Разбор задачи 3. Изменения температуры (8 класс)
Тема: поиск максимумаСложность: простая
Требуется найти номер `i` в диапазоне от 2 до `N` при котором значение `|a_i\ -\ a_{i-1}|` максимально (здесь `a_i` – показания термометра). Скобками `||` обозначается модуль (абсолютное значение) числа.
При реализации программы можно обойтись без массива, сохраняя предыдущее введенное значение в переменной t1:
var mdt,dt,mi,i,t1,t2,n:integer;
begin
read(n);
read(t1);
mdt:=0;
mi:=2;
for i:=2 to n do
begin
read(t2);
dt:=abs(t2-t1);
if dt>mdt then
begin
mdt:=dt;
mi:=i;
end;
t1:=t2;
end;
writeln(mi);
end.
