Como converter minutos em segundos em LISP usando uma função - Desafio de Programação Resolvido em LISP

Informe os minutos: 15
A quantidade de segundos é: 900

; Função usada para converter minutos em segundos
(defun converter(minutos)
  ; vamos declarar as variáveis locais que precisamos
  (let ((segundos))
    ; Fazemos a conversão dos minutos em segundos
    (setq segundos (* minutos 60))
    ; retornamos os segundos
    segundos
  )  
)

; Esta é a função principal
(defun principal()
  ; vamos declarar as variáveis locais que precisamos
  (let ((minutos)(segundos))
    ; vamos pedir para o usuário informar os minutos
    (princ "Informe os minutos: ")
    ; talvez o seu compilador não precise disso
    (force-output)
    (setq minutos (read))
    
    ; agora vamos chamar a função converter() para converter
    ; os minutos em segundos
    (setq segundos (converter minutos))
   
    ; E mostramos o resultado
    (format t "A quantidade de segundos é: ~D" segundos)
  )
)
 
; Auto-executa a função principal()
(principal)