Question

Дано целое число N (> 1) и набор из N чисел. Найти максимальную сумму двух

соседних чисел из данного набора.10 минут ждууу ...........

Answer 1

uses crt;
const n = 5;
var a:array[1..n] of integer;
i,max:integer;
begin
for i:=1 to n do
readln(a[i]);
max = a[1]+a[2];
for i:=1 to n-1 do
if (a[i]+a[i+1] > max) then
max:= a[i]+a[i+1];
writeln(max);
end.

Answer 2

for i:=1 to n-1 do
for j:=i+1 to n do что за команды ??

Answer 3

for i:=1 to n-1 do

Answer 4

if (a[i]+a[i+1] > max) then

Answer 5

пардон затупил что-то

Answer 6

Готово................

454cb1b9163b2559c1637b51c33aa6c5.pas

Answer 7

Там двоеточие пропущено)

Answer 8

в задаче наверху

Answer 9

это в какой строке?

Answer 10

max = a[1]+a[2];

Answer 11

Ну извинтиляюсь, по привычке на С++ так написал...