Size: a a a

2020 October 11

AK

A K in Lisp Forever
Лабораторная работа
источник

AK

A K in Lisp Forever
В этом семестре одна лабораторная три задачи и компьютерная контрольная, а в следующем надо посмотреть
источник

SA

Sokolov Andrew in Lisp Forever
ну да а типа
источник

SA

Sokolov Andrew in Lisp Forever
че сделать то надо
источник

AK

A K in Lisp Forever
В моем варианте
1. Вывести последний элемент массива.
2. Преобразовать массив в множество и 3. Проверка наличия элемента в массиве по заданному предикату
источник

SA

Sokolov Andrew in Lisp Forever
и пользоваться можно стандартной библиотекой???
источник

SA

Sokolov Andrew in Lisp Forever
если да то это все однострочники
источник

AK

A K in Lisp Forever
Указаний и ограничений в методичке нет так, что пользуюсь до чего голова дойдет
источник

SA

Sokolov Andrew in Lisp Forever
A K
Указаний и ограничений в методичке нет так, что пользуюсь до чего голова дойдет
(defun back (array)
 (aref array (1- (length array))))

(Defun array->set-list (array)
 (loop :with set := '()
       :for a :across array
       :do (pushnew a set)
       :finally (return set)))


(defun check (predicate sequence)
 (some predicate sequence))
источник

VM

Vyacheslav Mikushev in Lisp Forever
Sokolov Andrew
(defun back (array)
 (aref array (1- (length array))))

(Defun array->set-list (array)
 (loop :with set := '()
       :for a :across array
       :do (pushnew a set)
       :finally (return set)))


(defun check (predicate sequence)
 (some predicate sequence))
Не проще во втором задании использовать remove-duplicates?
источник

A

Aragaer in Lisp Forever
я б последний через рекурсию делал
источник

SA

Sokolov Andrew in Lisp Forever
зачем если есть some
источник

AK

A K in Lisp Forever
Первую я решил через Last
источник

SA

Sokolov Andrew in Lisp Forever
(defun back (array)
 (aref array (1- (length array))))

(defun array->set-list (array)
 (coerce (remove-duplicates array) 'list))

(defun check (predicate sequence)
 (some predicate sequence))
источник

A

Aragaer in Lisp Forever
последний в смысле последний элемент списка
источник

AK

A K in Lisp Forever
Хотя есть ещё вариант (car (reverse x))
источник

SA

Sokolov Andrew in Lisp Forever
как ты мог решить первую через ласт если ласт только на листах работает
источник

SA

Sokolov Andrew in Lisp Forever
а так
источник

SA

Sokolov Andrew in Lisp Forever
ты знаешь в чем разница между листом и массивом?
источник

AK

A K in Lisp Forever
В однотипности данных полагаю
источник