LINEGAME - VOI09 Trò chơi với băng số
Tác giả: RR
Ngôn ngữ: Pascal
uses math;
var
i,n:longint;
a,f1,f2:array[1..1000111] of int64;
begin
read(n);
for i:=1 to n do read(a[i]);
f1[1]:=a[1];
f1[2]:=max(f1[1],a[2]);
f2[2]:=max(a[1]-a[2],0);
for i:=3 to n do
begin
f1[i]:=max(f2[i-1]+a[i],f1[i-1]);
f2[i]:=max(f1[i-1]-a[i],f2[i-1]);
end;
writeln(max(f1[n],f2[n]));
end.