diff --git a/ex-1.03.scm b/ex-1.03.scm
index 2ff120c..9937bfa 100644
--- a/ex-1.03.scm
+++ b/ex-1.03.scm
@@ -1,4 +1,5 @@
-#| BEGIN (Write your solution here) |#
+#lang sicp
+
 (define (sqr x) (* x x))
 (define (solution a b c)
   (cond ((and (<= a b) (<= a c))
@@ -6,4 +7,3 @@
         ((and (<= b a) (<= b c))
          (+ (sqr a) (sqr c)))
         (else (+ (sqr a) (sqr b)))))
-#| END |#
diff --git a/ex-1.07.scm b/ex-1.07.scm
index e9b943c..75d57ca 100644
--- a/ex-1.07.scm
+++ b/ex-1.07.scm
@@ -1,4 +1,4 @@
-#| BEGIN (Write your solution here) |#
+#lang sicp
 (define (average a b)
   (/ (+ a b) 2))
 
@@ -15,4 +15,3 @@
 
 (define (square-root x)
   (sqrt-iter 1.0 x))
-#| END |#
diff --git a/ex-1.08.scm b/ex-1.08.scm
index 95021ce..d93513f 100644
--- a/ex-1.08.scm
+++ b/ex-1.08.scm
@@ -1,4 +1,5 @@
-#| BEGIN (Write your solution here) |#
+#lang sicp
+
 (define (improve guess x)
   (/ (+ (/ x guess guess)
         (* 2 guess))
@@ -15,4 +16,3 @@
 
 (define (cube-root x)
   (cbrt-iter 1.0 x))
-#| END |#