Question

Four function calculation.

Please write this code in Scheme. (Please dont write this code in java, c++ or sql. Only in Scheme.) just write the code on Four function calculation.

CODE WILL BE IN SCHEME LENGUAGE.

Answer 1

Sample run:

Scheme code with comments:

(define (ffcalculator expression)
(cond ((null? expression) 0) ; base condition handling zero and one terms
((null? (cdr expression)) (car expression))
(else ; to handle three or more terms
(let ((operand1 (car expression))
(operator (cadr expression))
(operands (cddr expression)))
((case operator ; convert operator and symbol to corresponding function
((*) *)
((/) /)
((+) +)
((-) -))
operand1
(ffcalculator operands)))))) ; evaluate the rest of the expression recursively