krzosa/corelang
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Before adding pointer idea

Browse Source
This commit is contained in:
Krzosa Karol
2022-06-08 12:59:43 +02:00
parent 19356026fe
commit 2f127dea98
1 changed files with 14 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
euler.kl
View File

@@ -1,13 +1,15 @@
// @todo: Add more stats in the preview
// @todo: for 0..1000(implicit i) and for i in 0..1000
// @todo: Add blocks of stmts that you can simply define inside a function etc.
entry :: () entry :: ()
printf("\n") printf("\n")
euler1() euler1()
euler3() euler3()
// @todo: Add more stats in the preview //-----------------------------------------------------------------------------
// @todo: for 0..1000(implicit i) and for i in 0..1000 // Euler 2
// @todo: Add blocks of stmts that you can simply define inside a function etc. //-----------------------------------------------------------------------------
euler1 :: () euler1 :: ()
end := 1000 end := 1000
result := 0 result := 0
@@ -19,6 +21,9 @@ euler1 :: ()
printf("Euler1: %lld\n", result) printf("Euler1: %lld\n", result)
//-----------------------------------------------------------------------------
// Euler 3
//-----------------------------------------------------------------------------
int_sqrt :: (s: S64): S64 int_sqrt :: (s: S64): S64
result := sqrt(cast(s: F64)) result := sqrt(cast(s: F64))
return cast(result: S64) return cast(result: S64)
@@ -52,6 +57,7 @@ euler3 :: ()
results[results_len++] = i results[results_len++] = i
n /= i n /= i
// Then check if our number is a prime it self
if n > 2 if n > 2
results[results_len++] = n results[results_len++] = n
@@ -64,6 +70,10 @@ euler3 :: ()
printf(":: %lld", is_correct) printf(":: %lld", is_correct)
//-----------------------------------------------------------------------------
// Euler 4
//-----------------------------------------------------------------------------
print_int :: (i: S64) print_int :: (i: S64)