blob: 6502411657d22decf4bb8197788deda1d122aae8 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
!!! all rights reserved to lars <3 !!!
lars initial values: @0 is n, @1 is result
0lars50
1lars1
larslars loop
@lars
sral|lars sral0 sral
1larssral1*sral0
0larssral0-1
srallars lars
larslarslars end: print number
@sral
8159larssral1
larssral lars
|