Files
zern/examples/euler12.zr
2025-06-02 18:03:03 +02:00

21 lines
412 B
Plaintext

func num_divisors[n: I64] : I64
let end: I64 = isqrt(n)
let result: I64 = 0
for i in 1:end+1
if n % i == 0
result = result + 2
if end * end == n
result = result - 1
return result
func main[] : I64
let n: I64 = 0
let i: I64 = 1
while 1
n = n + i
if num_divisors(n) > 500
print_i64(n)
return 0
i = i + 1