RosettaCodeData/Task/Loops-While/Bracmat/loops-while.bracmat

2 lines
47 B
Plaintext

1024:?n & whl'(!n:>0 & out$!n & div$(!n.2):?n)