0 Usuarios y 1 Visitante están viendo este tema.
SubProceso modxy = modulo ( x, y ) Si y = 0 Entonces modxy = x Sino modxy = x-y*(piso(x/y)) Fin SiFin SubProceso
piso(n)m=round(n)if m>n return(m-1)if m<=n return m