Программа для расчёта гиперфакториала на HP 12C/
Заносим в память n регистры 0 и 4:
5 STO 0
5 STO 4
Сама программа:
01 1 1
02 44 1 STO 1
03 44 2 STO 2
04 45 0 RCL 0
05 45 1 RCL 1
06 21 yX
07 45 2 RCL 2
08 20 *
09 44 2 STO 2
10 45 0 RCL 0
11 1 1
12 30 -
13 44 0 STO 0
14 45 1 RCL 1
15 1 1
16 40 +
17 44 1 STO 1
18 45 0 RCL 0
19 43 35 G X=0
20 43,33 22 G GTO 22
21 43,33 04 G GTO 04
22 1 1
23 44 1 STO 1
24 45 4 RCL 4
25 1 1
26 30 -
27 44 4 STO 4
28 44 0 STO 1
29 43 35 G X=0
30 43,33 32 G GTO 32
31 43,33 04 G GTO 04
32 45 2 RCL 2
33 43,33 00 G GTO 00
|