Data commit

Task/Ackermann-function/PowerShell/ackermann-function-1.psh

@@ -0,0 +1,11 @@
+function ackermann ([long] $m, [long] $n) {
+    if ($m -eq 0) {
+        return $n + 1
+    }
+
+    if ($n -eq 0) {
+        return (ackermann ($m - 1) 1)
+    }
+
+    return (ackermann ($m - 1) (ackermann $m ($n - 1)))
+}

Task/Ackermann-function/PowerShell/ackermann-function-2.psh

@@ -0,0 +1,6 @@
+foreach ($m in 0..3) {
+    foreach ($n in 0..6) {
+        Write-Host -NoNewline ("{0,5}" -f (ackermann $m $n))
+    }
+    Write-Host
+}

Task/Ackermann-function/PowerShell/ackermann-function-3.psh

@@ -0,0 +1,14 @@
+function Get-Ackermann ([int64]$m, [int64]$n)
+{
+    if ($m -eq 0)
+    {
+        return $n + 1
+    }
+
+    if ($n -eq 0)
+    {
+        return Get-Ackermann ($m - 1) 1
+    }
+
+    return (Get-Ackermann ($m - 1) (Get-Ackermann $m ($n - 1)))
+}

Task/Ackermann-function/PowerShell/ackermann-function-4.psh

@@ -0,0 +1,3 @@
+$ackermann = 0..3 | ForEach-Object {$m = $_; 0..6 | ForEach-Object {Get-Ackermann $m  $_}}
+
+$ackermann | Format-Wide {"{0,3}" -f $_} -Column 7 -Force