diff --git a/tests/pascal_triangle.aer b/tests/pascal_triangle.aer new file mode 100644 index 0000000..bb635bd --- /dev/null +++ b/tests/pascal_triangle.aer @@ -0,0 +1,25 @@ +class Program { + + private int fun(int $y) { + int $result = 1; + for(int $z = 1; $z <= $y; $z++) { + $result *= $z; + } + return $result; + } + + void main() { + int $z; + int $y = 5; + for(int $x = 0; $x < $y; $x++) { + for($z = 0; $z <= ($y - $x - 2); $z++) { + print(' '); + } + for($z = 0; $z <= $x; $z++) { + print($this->fun($x) / ($this->fun($z) * $this->fun($x - $z)), ' '); + } + print("\n"); + } + } + +} diff --git a/tests/pascal_triangle.exp b/tests/pascal_triangle.exp new file mode 100644 index 0000000..58032ed --- /dev/null +++ b/tests/pascal_triangle.exp @@ -0,0 +1,5 @@ + 1 + 1 1 + 1 2 1 + 1 3 3 1 +1 4 6 4 1