Написать предикат, расщепляющий список на два списка. Длина первого задана

@Toll · Регистрация: 18.01.2012

Author24 — интернет-сервис помощи студентам

Доброго времени суток, помогите решить и разобраться в задачке.
В данном языке программирования только начинаю разбираться.

Задача:
Написать предикат, расщепляющий список на два списка. Длина первого задана.

@Catstail · 18.04.2013, 16:54

1) предикат - это логическая функция (она возвращает True или False)
2) нужно от произвольного списка отщепить заданное число элементов и вернуть два списка (отщепленное и остаток)?

Добавлено через 7 минут
Можно так:

Haskell

cutList :: Int -> [a] -> [[a]]
cutList n x = [(take n x) , (drop n x)]
 
-- Проверка
 
Main> cutList 3 [11,22,33,44,55,66,77]
[[11,22,33],[44,55,66,77]]
 
Main> cutList 3 "ASDFGHJKLM"
["ASD","FGHJKLM"]

@Nameless One · 18.04.2013, 18:20

Еще можно стандартным splitAt воспользоваться.

PS. Тоже не понял, к чему тут предикат.

Добавлено через 19 минут
Вот решение «с предикатом» (takeFirst n вернет функцию-предикат), но оно получилось какое-то странное:

Haskell

import Control.Arrow
 
takeFirst :: Int -> (Int, a) -> Bool
takeFirst n = (< n) . fst
 
split :: Int -> [a] -> ([a], [a])
split n = (map snd *** map snd) . (takeWhile pred &&& dropWhile pred) . zip [0..]
    where pred = takeFirst n

Пример:

Haskell

1 2	> split 5 "helloworld" ("hello","world")

@korvin_ · 18.04.2013, 21:16

Сообщение от Nameless One

PS. Тоже не понял, к чему тут предикат.

В лисповом разделе тоже почему-то это слово часто звучит ни к месту.

Добавлено через 12 минут
Добавлю решение «с нуля» (без take и drop):

Haskell

1
2
3

splitAt n xs@(y:ys)
    | n <= 0    = ([], xs)
    | otherwise = let (l, r) = spiltAt (n-1) ys in (y:l, r)

@Toll 0 / 0 / 0 Регистрация: 18.01.2012 Сообщений: 19
		1
	Написать предикат, расщепляющий список на два списка. Длина первого задана 18.04.2013, 16:40. Показов 2139. Ответов 3 Метки нет (Все метки) Доброго времени суток, помогите решить и разобраться в задачке. В данном языке программирования только начинаю разбираться. Задача: Написать предикат, расщепляющий список на два списка. Длина первого задана. 0

	18.04.2013, 21:16