hp48g20230307/D.01/D.01/MAT/uide


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

%%HP: T(1)A(D)F(,);
«
"Deljitelji-Sijanec 2019"
{ { "x:" "" 0 } } {
} DUP DUP
  IF INFORM
  THEN OBJ DROP
'A' STO 1 A ƒ
    FOR i
      IF A i MOD 0
=
      THEN i DUP
      END
    NEXT
  END
»