Пары элементов в массиве - Pascal
Формулировка задачи:
Народ здорово! Во первых всех с Праздником! А во-вторых - может кто поможет. Есть такая задача - "Составить программу отыскивающую среди пар элементов массива a[i] те, разность между которыми есть величина наименьшая для данного массива" Я что-то никак не могу догнать как это сделать чтобы он искал марами и вычитал между этими парами? Если кто чем поможет буду благодарен!))
Решение задачи: «Пары элементов в массиве»
textual
Листинг программы
for i:=1 to n-1 do
if (a[i+1]-a[i])=k then
Writeln('a[',i+1,']-a[',i,'] = ',a[i+1],'-',a[i],' = ',k);
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д