Xlogo Radios

para area :b :h

HAZ "AR (:B * :H) / 2

ES  [SU AREA ES ] es :AR  es [m2]

fin
para dado

es (1+ azar 6) + (1+ azar 6)

fin


para divent :a :b

HAZ "C cociente :A  :B
es [el cociente es:]
ES :C
es [el resto es:]
ES :A - :B * :C

fin

para radios :n :l
repite :N [av :L re :L gd 360/:n]
fin