;; autor: Santiago
;; fecha de creacion: 07/12/2020
;; contrato: area: numero, numero -> numero
;; proposito: hallar el area del circulo
;; ejemplo ((operacion numeropi 4)(* numeropi (sqr 4)))retorna  50.2656)((operacion numeropi 5)(* numeropi (sqr 5)))retorna  78.54)
;; definicion:
(define numeropi 3.1416)
(define (operacion numeropi r)
  (* numeropi (sqr r)))
;;pruebas:
(check-expect (operacion numeropi 5) 78.54)
(check-expect (operacion numeropi 4) 50.2656)