From 1a8e1e68759611a66ae116771da5f376c95a3b9f Mon Sep 17 00:00:00 2001 From: Raphael McSinyx Date: Sun, 12 Feb 2017 16:18:20 +0700 Subject: Update others/volume1 --- others/volume1/032.pas | 24 ++++++++++++++++++++++++ 1 file changed, 24 insertions(+) create mode 100644 others/volume1/032.pas (limited to 'others/volume1/032.pas') diff --git a/others/volume1/032.pas b/others/volume1/032.pas new file mode 100644 index 0000000..7813997 --- /dev/null +++ b/others/volume1/032.pas @@ -0,0 +1,24 @@ +uses sortnfind; + +var + n, i: int16; + a, b: array of int64; + +begin + readln(n); + setlength(a, n); + for i := 0 to n - 1 do + read(a[i]); + qsort(a); + setlength(b, n); + for i := 0 to n - 1 do + read(b[i]); + qsort(b); + for i := 0 to n - 1 do + if a[i] <> b[i] then + begin + writeln('NO'); + exit + end; + writeln('YES') +end. -- cgit 1.4.1