ПАСКАЛЬ. 9 КЛАСС В одномерном массиве целых чисел найти максимальную разность двух соседних чисел (ввод чисел организовать с клавиатуры).
Разность - это вычитать из текущего следующее, или из следующего текущее?
Одно и то же, если брать модуль разности
Про модуль в вопросе ничего не сказано.
Фантазировать каждый может, конечно. Но я привык читать условие, а не домысливать его.
Модуль это та же разность, но с плюсом, чтобы программа могла правильно сравнивать разности чисел.Согласитесь, будет неловко, если у чисел остаток от вычитания -32, а программа выведет 14, потому что это число положительное => больше -32.
Если меня интересует ход температур, причем именно максимальное потепление или похолодание, знак как раз важен.
Потеплело на -7 градусов, забавно)
А вот чтобы не было так забавно, надо получать максимумы вычитанием из большего меньшего.
Причем, это для случая вычитаения текущего значения из следующего. Нарисуйте себе график, если так непонятно.
Ответ:
program raznost;
var i,s,n,m:integer;
a: array [1..15000] of integer;
begin
readln(n);
for i:=1 to n do
readln (a[i]);
s:=0; m:=0;
for i:=1 to n-1 do begin
s:=abs(a[i]-a[i+1]);
if s>m then
m:=s;
end;
writeln ('Maksimalnaya raznost` ravna ',m);
end.
Объяснение: