about summary refs log tree commit diff
path: root/others/volume1/082.pas
diff options
context:
space:
mode:
Diffstat (limited to 'others/volume1/082.pas')
-rw-r--r--others/volume1/082.pas20
1 files changed, 20 insertions, 0 deletions
diff --git a/others/volume1/082.pas b/others/volume1/082.pas
new file mode 100644
index 0000000..f195aa7
--- /dev/null
+++ b/others/volume1/082.pas
@@ -0,0 +1,20 @@
+uses clib;
+
+var
+  n: int16;
+  a, g, l: int32;
+
+begin
+  read(n, a);
+  g := a;
+  l := a;
+  while n > 1 do
+    begin
+      dec(n);
+      read(a);
+      g := gcd(g, a);
+      l := l * a div gcd(l, a);
+      writeln(a, ' ', g, ' ', l)
+    end;
+  writeln(g, ' ', l)
+end.