From 1a8e1e68759611a66ae116771da5f376c95a3b9f Mon Sep 17 00:00:00 2001
From: Raphael McSinyx <vn.mcsinyx@gmail.com>
Date: Sun, 12 Feb 2017 16:18:20 +0700
Subject: Update others/volume1

---
 others/volume1/006.pas | 18 ++----------------
 1 file changed, 2 insertions(+), 16 deletions(-)

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

diff --git a/others/volume1/006.pas b/others/volume1/006.pas
index 989acba..878f077 100644
--- a/others/volume1/006.pas
+++ b/others/volume1/006.pas
@@ -1,23 +1,9 @@
+uses cmath;
+
 var
   a, b, g: int64;
   c, d: longint;
 
-
-function gcd(x, y: int64): int64;
-  var
-    z: longint;
-
-  begin
-    while y > 0 do
-      begin
-        z := y;
-        y := x mod y;
-        x := z
-      end;
-    gcd := x
-  end;
-
-
 begin
   readln(a, b, c, d);
   a := a * d + b * c;
-- 
cgit 1.4.1