Advertisement
CrlitosGPro

Untitled

Jun 27th, 2020
37
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.39 KB | None | 0 0
  1. ;; Autor: Carlos Guerrero Ingeniería de Sistemas
  2. ;; Fecha de creación: 27/06/2020
  3. ;; Contrato: hipotenusa: numero+numero=numero
  4. ;; Propósito: Este programa calcula la hipotenusa a partir de los dos catetos ya conocidos.
  5. ;; Ejemplo: (hipotenusa (sqrt (+ (sqr 9)(sqr 9)))) retorna 12.7279...
  6.  
  7. (define catetoA 9)
  8. (define catetoO 9)
  9. (define hipotenusa (sqrt (+ (sqr catetoA)(sqr catetoO))))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement