Skip to content

Commit d4b9c12

Browse files
committed
🔨 adding lab_05 to main readme
1 parent 5f16328 commit d4b9c12

File tree

1 file changed

+32
-0
lines changed

1 file changed

+32
-0
lines changed

readme.md

Lines changed: 32 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -133,3 +133,35 @@
133133
5. Написать функцию, вычисляющую площадь трапеции по ее основаниям и
134134
высоте, и составить диаграмму ее вычисления.
135135
</details>
136+
137+
<details>
138+
<summary><b>Лабораторная работа 5</b></summary>
139+
140+
1. Написать функцию, которая принимает целое число и возвращает первое четное число, не меньшее аргумента.
141+
2. Написать функцию, которая принимает число и возвращает число того же знака, но с модулем на 1 больше модуля аргумента.
142+
3. Написать функцию, которая принимает два числа и возвращает список из этих чисел, расположенный по возрастанию.
143+
4. Написать функцию, которая принимает три числа и возвращает Т только тогда, когда первое число расположенно между вторым и третьим.
144+
5. Каков результат вычисления следующих выражений?
145+
146+
* `(and ’fee ’fie ’foe)`
147+
* `(or nil ’fie ’foe)`
148+
* `(and (equal ’abc ’abc) ’yes)`
149+
* `(or ’fee ’fie ’foe)`
150+
* `(and nil ’fie ’foe)`
151+
* `(or (equal ’abc ’abc) ’yes)`
152+
153+
6. Написать предикат, который принимает два числа-аргумента и возвращает Т, если первое число не меньше второго.
154+
7. Какой из следующих двух вариантов предиката ошибочен и почему?
155+
156+
```lisp
157+
(defun pred1 (x)
158+
(and (numberp x) (plusb x))
159+
)
160+
161+
(defun pred2 (x)
162+
(and (plusp x) (numberp x))
163+
)
164+
```
165+
166+
8. Решить задачу 4, используя для ее решения конструкции IF, COND, AND/OR.
167+
</details>

0 commit comments

Comments
 (0)