diff --git a/Павлова Наташа/README.md b/Павлова Наташа/README.md
new file mode 100644
index 0000000..472aecf
--- /dev/null
+++ b/Павлова Наташа/README.md	
@@ -0,0 +1,3 @@
+# Лемма 7.6
+## Ссылка на видеоразбор
+https://youtu.be/8mOFRUgdmZU
\ No newline at end of file
diff --git a/Павлова Наташа/lemma_7.6.rkt b/Павлова Наташа/lemma_7.6.rkt
new file mode 100644
index 0000000..ee0ca27
--- /dev/null
+++ b/Павлова Наташа/lemma_7.6.rkt	
@@ -0,0 +1,22 @@
+#lang racket
+
+(define (rev lst)
+  (if (null? lst);ф-я принимает пустой список
+      lst;возвращает пустой список
+      (if (= 1 (length lst));ф-я принимает список из 1 элемента
+          lst; возвращает  список из 1 элемента
+          ;в списке можно выделить голову и хвост
+          (append (rev (cdr lst)); запускаем rev для хвоста (cdr - хвост)
+                      (list(car lst));возвращаем голову (car - голова)
+           )
+      )
+  )
+)
+
+(writeln(rev(rev '(1 2 3 4))))
+
+
+
+
+
+