langs a-z

2013-04-10 22:43:41 -07:00 · 2013-04-10 22:43:41 -07:00 · d066446780
commit d066446780
parent db842d013d
11389 changed files with 98361 additions and 1020 deletions
--- a/Task/Greatest-common-divisor/PowerShell/greatest-common-divisor.psh
+++ b/Task/Greatest-common-divisor/PowerShell/greatest-common-divisor.psh
@ -0,0 +1,18 @@
+function Get-GCD ($x, $y)
+{
+  if ($x -eq $y) { return $y }
+  if ($x -gt $y) {
+    $a = $x
+    $b = $y
+  }
+  else {
+    $a = $y
+    $b = $x
+  }
+  while ($a % $b -ne 0) {
+    $tmp = $a % $b
+    $a = $b
+    $b = $tmp
+  }
+  return $b
+}