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/035.pas | 12 ++----------
 1 file changed, 2 insertions(+), 10 deletions(-)

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

diff --git a/others/volume1/035.pas b/others/volume1/035.pas
index ccf9560..649e398 100644
--- a/others/volume1/035.pas
+++ b/others/volume1/035.pas
@@ -1,17 +1,9 @@
+uses clib;
+
 var
   n, a: int16;
   b: array of boolean;
 
-function all(b: array of boolean): boolean;
-  var
-    i: int16;
-  begin
-    for i := 0 to length(b) - 1 do
-      if not b[i] then
-        exit(false);
-    all := true
-  end;
-
 begin
   readln(n);
   setlength(b, n);
-- 
cgit 1.4.1