; 定义函数 newCalc,接受两个参数 x 和 y
(define (newCalc x y)
(* (- x 1) (* y 3)))
; 调用函数 newCalc 并打印结果
(display "Result 1: ")
(display (newCalc 4 5))
(newline)
(display "Result 2: ")
(display (newCalc 4 3))
(newline)
(display "Result 3: ")
(display (newCalc 2 3))
(newline)
(display "Result 4: ")
(display (newCalc (4 5)))
(newline)