Выполнить ряд операций над файлом - Lisp

Формулировка задачи:

Здравствуйте. Требуется написать вот такой алгоритм. Работаем на DR.racket. LISP никогда не изучали, воткнули в программу учебную его нам и мол пишите( вот собственно программа: 1.Открыть файл test.txt 2.Записать слово "начало",Перейти на след. строку 3.Выдать на экран приглашение "Вводите первый список",Ввести с клавиатуры первый список 4.Выдать на экран приглашение "Вводите второй список", Ввести с клавиатуры второй список 5.Записать в файл "первый список=",Записать в файл введенный первый список с клавиатуры 6.Записать в файл "второй список=", Записать в файл введенный второй список с клавиатуры 7.Перейти на след.строку 8.Сделать новый список, i-тый элемент которого есть разность j-тых элементов первого и второго списков.Если списки разной длинны,то меньший список дополнить нулями 9.Записать в файл "разность списков=",Записать в файл разность списков 10.Перейти на след строку,Записать слово "Конец" 11.Закрыть файл и выдать на экран "Программа закончила работу" Помогите,кто чем сможет...дайте стьюденту зачет получить_)

Решение задачи: «Выполнить ряд операций над файлом»

Листинг программы

> (map - '(1 2 3 4) '(5 6 7 8))
'(-4 -4 -4 -4)
>

Объяснение кода листинга программы

В этом коде используется операция MAP, которая применяет указанную функцию к каждому элементу первого списка и собирает результаты в новый список. В данном случае первый список - это '(1 2 3 4), а второй список - '(5 6 7 8). Функция, которую применяет MAP, - это '-'. Она вычитает из каждого элемента первого списка соответствующий элемент второго списка. Таким образом, результат будет новый список, в котором каждый элемент будет получен путем вычитания соответствующего элемента второго списка из соответствующего элемента первого списка. В данном случае результат будет '(-4 -4 -4 -4)'.