RosettaCodeData/Task/Arithmetic-Complex/Scheme/arithmetic-complex.scm

8 lines
115 B
Scheme

(define a 1+i)
(define b 3.14159+1.25i)
(define c (+ a b))
(define c (* a b))
(define c (/ 1 a))
(define c (- a))