diff options
Diffstat (limited to 'hp48g20230307/D.01/D.01/MAT/VIET')
-rw-r--r-- | hp48g20230307/D.01/D.01/MAT/VIET | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/hp48g20230307/D.01/D.01/MAT/VIET b/hp48g20230307/D.01/D.01/MAT/VIET new file mode 100644 index 0000000..5d707cd --- /dev/null +++ b/hp48g20230307/D.01/D.01/MAT/VIET @@ -0,0 +1,8 @@ +%%HP: T(1)A(D)F(,);
+« 'A' STO 'B' STO
+ FOR i
+ IF A i MOD 0 =
+ THEN i DUP
+ END
+ NEXT
+»
|