summaryrefslogtreecommitdiffstats
path: root/hp48g20230307/D.01/D.01/MAT/VIET
blob: 5d707cd28515548c888da8eb3176b662af073bfb (plain) (blame)
1
2
3
4
5
6
7
8
%%HP: T(1)A(D)F(,);
« 'A' STO 'B' STO
  FOR i
    IF A i MOD 0 =
    THEN i DUP
    END
  NEXT
»