> 1 <
Автор | Сообщение |
Lisp57
3 сообщений |
#7672 2015-12-19 01:33 GMT+3 часа(ов) |
Доброго времени суток!
![]() Кто-нибудь встречался с подобной задачей на языке обработки списков (LISP)? Реализовать стек в виде списка. Дана величина a строкового типа из четного количества символов (стек №1). Получить и напечатать величину b (стек №2), состоящую из символов первой половины величины a, записанных в обратном порядке, после которых идут символы второй половины величины a, также записанные в обратном порядке (используя промежуточный стек №3). Например, при а = "привет" b должно быть равно "ирптев". |
|
Valko
29 сообщений |
#7683 2015-12-20 14:27 GMT+3 часа(ов) |
Нет, никто.
|
|
Lisp57
3 сообщений |
#7686 2016-01-04 17:00 GMT+3 часа(ов) |
(defun wtf (a)
(let ((b (reverse (subseq a 0 (/ (length a) 2)))) (c (reverse (subseq a (/ (length a) 2) (length a))))) (format t "~s" (concatenate 'string b c)))) * (wtf "привет") "ирптев" NIL |
|
Valko
29 сообщений |
#7688 2016-01-05 19:03 GMT+3 часа(ов) |
(wtf "приве") |
|
_sg
42 сообщений |
#7689 2016-01-09 13:58 GMT+3 часа(ов) |
(defun wtf (a &aux (m (/ (length a) 2))) |
|
> 1 <