Introducción al cálculo numérico con WinLogo (LOGO). Conversión de horas a minutos

; ---------------------------------------------------------
; Conversió d'hores a minuts
;    © Joan Aranes Clua, 1997
                CC BY 4.0
; ---------------------------------------------------------

procediment conversor.hores.a.minuts
  esborra.text
  mou.cursor [6 2]
  escriu.seguit [Digues un nombre d'hores: $ ]
  posa.a "hores paraula.llegida
  mou.cursor [9 4]
  (escriu :hores [hores són] :hores*60 "minuts)
  escriu " ;salt de linia
  mou.cursor [12 6]
  escriu [Voleu continuar ? (s/n)]
  posa.a "resposta caràcter.llegit
  si :resposta = "n [acaba]
  conversor.hores.a.minuts
fi
; ----------------------------------------------------------

% conversor.hores.a.minuts ;posta en marxa