Added triple

Author: Undalevein

batch/test.ps1

@@ -13,6 +13,9 @@ $Error.clear()
     Compare-Object (Get-Content "$PSScriptRoot\..\test\clockhands_expected") |
     Assert-MatchTests &&
 . "$PSScriptRoot\hello.bat" &&
+. "$PSScriptRoot\triple.bat" |
+    Compare-Object (Get-Content "$PSScriptRoot\..\test\triple_expected") |
+    Assert-MatchTests &&
 ForEach-Object 'foo'
 
 if ($Error -or !$?) { 

batch/triple.bat

@@ -0,0 +1,19 @@
+@ECHO OFF
+
+FOR /L %%c IN (1, 1, 40) DO CALL :FIRST %%c
+GOTO :END
+
+:FIRST
+FOR /L %%b IN (1, 1, %1) DO CALL :SECOND %1 %%b
+GOTO :END
+
+:SECOND
+FOR /L %%a IN (1, 1, %2) DO CALL :THIRD %1 %2 %%a
+GOTO :END
+
+:THIRD
+SET /A legs=%3 * %3 + %2 * %2
+SET /A hyp=%1*%1
+IF %legs% EQU %hyp% ECHO %3, %2, %1
+
+:END