From fa92a157746ae17f295d31b7a047dfeb99624a13 Mon Sep 17 00:00:00 2001 From: Baitinq Date: Wed, 11 Jun 2025 00:16:17 +0200 Subject: Misc: Rename lang --- examples/13.pry | 44 ++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 44 insertions(+) create mode 100644 examples/13.pry (limited to 'examples/13.pry') diff --git a/examples/13.pry b/examples/13.pry new file mode 100644 index 0000000..839caef --- /dev/null +++ b/examples/13.pry @@ -0,0 +1,44 @@ +import "!stdlib.pry"; + +let main = () => i64 { + /* Iterative Fibonacci using while loop. */ + let fibonacci_iter = (n: i64) => i64 { + let a = 0; + let b = 1; + let i = 0; + while i < n { + let temp = b; + b = a + b; + a = temp; + i = i + 1; + }; + return a; + }; + + /* Recursive GCD using Euclid's algorithm. */ + let gcd = (a: i64, b: i64) => i64 { + if b == 0 { + return a; + }; + return gcd(b, a % b); + }; + + let fib_val = fibonacci_iter(10); + printf("%d\n", fib_val); + + let gcd_val = gcd(48, 18); + printf("%d\n", gcd_val); + + return 0; +}; + +/* + +Expected stdout: + +55 +6 + +Expected return: 0 + +*/ -- cgit 1.4.1