Language: C++

var
    n,m,i:longint;
    d,t:array[1..200000]of longint;
    bd,bt:array[1..200000]of boolean;
    td,tt:longint;

procedure sort( l,r:longint);
var
  x,e,j,i:longint;
begin
  i:=l;j:=r;x:=(l+r)div 2;
  repeat
    while (d[i]<d[x]) do inc(i);
    while(d[j]>d[x]) do dec(j);
    if(i<=j)then
    begin
      e:=d[i];d[i]:=d[j];d[j]:=e;inc(i);dec(j);end;
  until(i>j);
  if i<r then sort(i,r);
  if l<j then sort(l,j);
end;

procedure qsort( l,r:longint);
var
  x,e,j,i:longint;
begin
  i:=l;j:=r;x:=(l+r)div 2;
  repeat
    while (t[i]<t[x]) do inc(i);
    while(t[j]>t[x]) do dec(j);
    if(i<=j)then
    begin
      e:=t[i];t[i]:=t[j];t[j]:=e;inc(i);dec(j);end;
  until(i>j);
  if i<r then qsort(i,r);
  if l<j then qsort(l,j);
end;

begin
  readln(n);
  for i:=1 to n do
    read(d[i]);
  readln;
  readln(m);
  for i:=1 to m do
    read(t[i]);
  readln;
  sort(1,n);
  qsort(1,m);
  td:=n;tt:=m;
  while(td>=1)and(tt>=1)do
  begin
    if t[tt]=d[td] then begin dec(tt);dec(td);end
    else if t[tt]<d[td] then dec(td)
    else if((t[tt]>d[td])or(td=0))then begin writeln('NO');exit;end;
  end;
  writeln('YES');
end.



Compiler output:
a.cc:3:15: error: too many decimal points in number
    3 |     d,t:array[1..200000]of longint;
      |               ^~~~~~~~~
a.cc:4:17: error: too many decimal points in number
    4 |     bd,bt:array[1..200000]of boolean;
      |                 ^~~~~~~~~
a.cc:55:54: warning: multi-character character constant [-Wmultichar]
   55 |     else if((t[tt]>d[td])or(td=0))then begin writeln('NO');exit;end;
      |                                                      ^~~~
a.cc:57:11: warning: multi-character character constant [-Wmultichar]
   57 |   writeln('YES');
      |           ^~~~~
a.cc:1:1: error: 'var' does not name a type
    1 | var
      | ^~~
a.cc:3:5: error: 'd' does not name a type
    3 |     d,t:array[1..200000]of longint;
      |     ^
a.cc:4:5: error: 'bd' does not name a type
    4 |     bd,bt:array[1..200000]of boolean;
      |     ^~
a.cc:5:5: error: 'td' does not name a type
    5 |     td,tt:longint;
      |     ^~
a.cc:7:1: error: 'procedure' does not name a type
    7 | procedure sort( l,r:longint);
      | ^~~~~~~~~
a.cc:8:1: error: 'var' does not name a type
    8 | var
      | ^~~
a.cc:10:1: error: 'begin' does not name a type
   10 | begin
      | ^~~~~
a.cc:11:8: error: 'j' does not name a type
   11 |   i:=l;j:=r;x:=(l+r)div 2;
      |        ^
a.cc:11:13: error: 'x' does not name a type
   11 |   i:=l;j:=r;x:=(l+r)div 2;
      |             ^
a.cc:12:3: error: 'repeat' does not name a type
   12 |   repeat
      |   ^~~~~~
a.cc:14:5: error: expected unqualified-id before 'while'
   14 |     while(d[j]>d[x]) do dec(j);
      |     ^~~~~
a.cc:15:5: error: expected unqualified-id before 'if'
   15 |     if(i<=j)then
      |     ^~
a.cc:17:15: error: 'd' does not name a type
   17 |       e:=d[i];d[i]:=d[j];d[j]:=e;inc(i);dec(j);end;
      |               ^
a.cc:17:26: error: 'd' does not name a type
   17 |       e:=d[i];d[i]:=d[j];d[j]:=e;inc(i);dec(j);end;
      |                          ^
a.cc:17:37: error: expected constructor, destructor, or type conversion before '(' token
   17 |       e:=d[i];d[i]:=d[j];d[j]:=e;inc(i);dec(j);end;
      |                                     ^
a.cc:17:44: error: expected constructor, destructor, or type conversion before '(' token
   17 |       e:=d[i];d[i]:=d[j];d[j]:=e;inc(i);dec(j);end;
      |                                            ^
a.cc:17:48: error: 'end' does not name a type
   17 |       e:=d[i];d[i]:=d[j];d[j]:=e;inc(i);dec(j);end;
      |                                                ^~~
a.cc:18:8: error: expected constructor, destructor, or type conversion before '(' token
   18 |   until(i>j);
      |        ^
a.cc:19:3: error: expected unqualified-id before 'if'
   19 |   if i<r then sort(i,r);
      |   ^~
a.cc:20:3: error: expected unqualified-id before 'if'
   20 |   if l<j then sort(l,j);
      |   ^~
a.cc:21:1: error: 'end' does not name a type
   21 | end;
      | ^~~
a.cc:23:1: error: 'procedure' does not name a type
   23 | procedure qsort( l,r:longint);
      | ^~~~~~~~~
a.cc:24:1: error: 'var' does not name a type
   24 | var
      | ^~~
a.cc:26:1: error: 'begin' does not name a type
   26 | begin
      | ^~~~~
a.cc:27:8: error: 'j' does not name a type
   27 |   i:=l;j:=r;x:=(l+r)div 2;
      |        ^
a.cc:27:13: error: 'x' does not name a type
   27 |   i:=l;j:=r;x:=(l+r)div 2;
      |             ^
a.cc:28:3: error: 'repeat' does not name a type
   28 |   repeat
      |   ^~~~~~
a.cc:30:5: error: expected unqualified-id before 'while'
   30 |     while(t[j]>t[x]) do dec(j);
      |     ^~~~~
a.cc:31:5: error: expected unqualified-id before 'if'
   31 |     if(i<=j)then
      |     ^~
a.cc:33:15: error: 't' does not name a type
   33 |       e:=t[i];t[i]:=t[j];t[j]:=e;inc(i);dec(j);end;
      |               ^
a.cc:33:26: error: 't' does not name a type
   33 |       e:=t[i];t[i]:=t[j];t[j]:=e;inc(i);dec(j);end;
      |                          ^
a.cc:33:37: error: expected constructor, destructor, or type conversion before '(' token
   33 |       e:=t[i];t[i]:=t[j];t[j]:=e;inc(i);dec(j);end;
      |                                     ^
a.cc:33:44: error: expected constructor, destructor, or type conversion before '(' token
   33 |       e:=t[i];t[i]:=t[j];t[j]:=e;inc(i);dec(j);end;
      |                                            ^
a.cc:33:48: error: 'end' does not name a type
   33 |       e:=t[i];t[i]:=t[j];t[j]:=e;inc(i);dec(j);end;
      |                                                ^~~
a.cc:34:8: error: expected constructor, destructor, or type conversion before '(' token
   34 |   until(i>j);
      |        ^
a.cc:35:3: error: expected unqualified-id before 'if'
   35 |   if i<r then qsort(i,r);
      |   ^~
a.cc:36:3: error: expected unqualified-id before 'if'
   36 |   if l<j then qsort(l,j);
      |   ^~
a.cc:37:1: error: 'end' does not name a type
   37 | end;
      | ^~~
a.cc:39:1: error: 'begin' does not name a type
   39 | begin
      | ^~~~~
a.cc:41:3: error: expected unqualified-id before 'for'
   41 |   for i:=1 to n do
      |   ^~~
a.cc:43:3: error: 'readln' does not name a type
   43 |   readln;
      |   ^~~~~~
a.cc:44:9: error: expected constructor, destructor, or type conversion before '(' token
   44 |   readln(m);
      |         ^
a.cc:45:3: error: expected unqualified-id before 'for'
   45 |   for i:=1 to m do
      |   ^~~
a.cc:47:3: error: 'readln' does not name a type
   47 |   readln;
      |   ^~~~~~
a.cc:48:7: error: expected constructor, destructor, or type conversion before '(' token
   48 |   sort(1,n);
      |       ^
a.cc:49:8: error: expected constructor, destructor, or type conversion before '(' token
   49 |   qsort(1,m);
      |        ^
a.cc:50:3: error: 'td' does not name a type
   50 |   td:=n;tt:=m;
      |   ^~
a.cc:50:9: error: 'tt' does not name a type
   50 |   td:=n;tt:=m;
      |         ^~
a.cc:51:3: error: expected unqualified-id before 'while'
   51 |   while(td>=1)and(tt>=1)do
      |   ^~~~~
a.cc:53:42: error: expected constructor, destructor, or type conversion before '(' token
   53 |     if t[tt]=d[td] then begin dec(tt);dec(td);end
      |                                          ^
a.cc:53:47: error: 'end' does not name a type
   53 |     if t[tt]=d[td] then begin dec(tt);dec(td);end
      |                                               ^~~
a.cc:55:60: error: 'exit' does not name a type
   55 |     else if((t[tt]>d[td])or(td=0))then begin writeln('NO');exit;end;
      |                                                            ^~~~
a.cc:1:1: note: 'exit' is defined in header '<cstdlib>'; this is probably fixable by adding '#include <cstdlib>'
  +++ |+#include <cstdlib>
    1 | var
a.cc:55:65: error: 'end' does not name a type
   55 |     else if((t[tt]>d[td])or(td=0))then begin writeln('NO');exit;end;
      |                                                                 ^~~
a.cc:56:3: error: 'end' does not name a type
   56 |   end;
      |   ^~~
a.cc:57:10: error: expected constructor, destructor, or type conversion before '(' token
   57 |   writeln('YES');
      |          ^
a.cc:58:1: error: 'end' does not name a type
   58 | end.
      | ^~~