LINEGAME C++

#include<bits/stdc++.h>
using namespace std;
int n,a[1000005];
long long f[1000005],g[1000005],s;


void nhap()
{
    scanf("%d ",&n);
    for(int i=1;i<=n;i++) scanf("%d ",&a[i]);
}

void giai()
{
    f[0]=0;g[0]=0;
    for(int i=1;i<=n;i++)
    {
        f[i]=max(f[i-1],g[i-1]+a[i]);
        g[i]=max(g[i-1],f[i-1]-a[i]);
    }
    s=max(f[n],g[n]);
    printf("%lld ",s);
}
int main()
{
    freopen("linegame.inp","r",stdin);
    freopen("linegame.out","w",stdout);
    nhap();
    giai();
}

    code pascal mau
var n:longint;
    a,f,g:array[0..1000000] of longint;
    t,i:longint;
function max(a,b:longint):longint;
var x:longint;
begin
    x:=a;
    if b>x then x:=b;
    exit(x);
end;

procedure nhap;
var i:longint;
begin
    read(n);
    for i:=1 to n do read(a[i]);
end;

procedure giai;
begin
    f[0]:=0;g[0]:=0;
    for i:=1 to n do
    begin
        f[i]:=max(f[i-1],g[i-1]+a[i]);
        g[i]:=max(g[i-1],f[i-1]-a[i]);
    end;
    writeln(max(f[n],g[n]));
end;
begin
   assign(input,'linegame.inp');reset(input);
   assign(output,'linegame.out');rewrite(output);
   nhap;
   giai;

   close(input);close(output);
end.