; the first two programs

(define (hello)
  (display "Hello, world!")
  (newline))

(define (temp-table)
  (do ((f 0 (+ f 20))) ((< 300 f))
    (display f)
    (display #\tab)
    (display (inexact->exact (round (* (- f 32) 5/9))))
    (newline)))

(hello)
(newline)
(temp-table)

Hello, world!

0	-18
20	-7
40	4
60	16
80	27
100	38
120	49
140	60
160	71
180	82
200	93
220	104
240	116
260	127
280	138
300	149