En Logo con LogoFE
para calc
haz "frac [[2 6] [2 4] [1 8] [4 8] [2 3] [1 4]]
haz "resultado []
repite 6 [
apila "resultado impon [demarca: "/] :frac
haz "frac ingresa [fracciona suma] lista 2 impon [divid] :frac
]
porcada [escribe ?] :resultado
fin
calc
38/3
23/4 83/12
65/24 73/24 31/8
35/24 5/4 43/24 25/12
5/6 5/8 5/8 7/6 11/12
2/6 2/4 1/8 4/8 2/3 1/4