From 5a44eb260b9b35096df7371a702ba99b7265b3f9 Mon Sep 17 00:00:00 2001
From: Raphael McSinyx <vn.mcsinyx@gmail.com>
Date: Wed, 15 Feb 2017 11:33:54 +0700
Subject: Update others/volume1

---
 others/volume1/065.pas | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100644 others/volume1/065.pas

(limited to 'others/volume1/065.pas')

diff --git a/others/volume1/065.pas b/others/volume1/065.pas
new file mode 100644
index 0000000..6e9106c
--- /dev/null
+++ b/others/volume1/065.pas
@@ -0,0 +1,19 @@
+var
+  n, i, k: int32;
+  b: array of boolean;
+
+begin
+  readln(n, k);
+  setlength(b, n);
+  for i := 0 to n - 1 do
+    b[i] := true;
+  repeat
+    read(i);
+    b[i - 1] := false;
+    dec(k)
+  until k = 0;
+  for i := 0 to n - 1 do
+    if b[i] then
+      write(i + 1, ' ');
+  writeln
+end.
-- 
cgit 1.4.1