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/055.pas | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 others/volume1/055.pas

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

diff --git a/others/volume1/055.pas b/others/volume1/055.pas
new file mode 100644
index 0000000..0e57447
--- /dev/null
+++ b/others/volume1/055.pas
@@ -0,0 +1,18 @@
+var
+  n, i, j: int16;
+  a, min: int64;
+ 
+begin
+  min := 9223372036854775807;
+  readln(n);
+  for i := 1 to n do
+    begin
+      read(a);
+      if a < min then
+        begin
+          j := i;
+          min := a
+        end
+    end;
+  writeln(j, ' ', min)
+end.
-- 
cgit 1.4.1