Создать бесконечный список символов, получающихся последовательной записью натуральных чисел

@xam max · Регистрация: 27.09.2009

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

Помогите пожалуйста с заданием, необходимо создать бесконечный список символов, получающихся последовательной записью натуральных чисел: [’1’,’2’,’3’,’4’,’5’,’6’,’7’,’8’,’9’,’1’,’0’,’1’,’1’,’1’,’2’,…], никак не могу подступиться к решению

@calabi-yau · 28.10.2012, 22:57

Haskell

1	concat $ map show [1 .. ]

или

Haskell

1	[1 .. ] >>= show

@flammberg · 28.10.2012, 23:05

Haskell

numList :: [Int]
numList = concat $ map toNumbers [1..]
   where 
      toNumbers :: Int -> [Int]
      toNumbers n | n == 0 = []
             | otherwise = toNumbers (n `div` 10) ++ [n `mod` 10]

@Catstail · 29.10.2012, 00:26

Или вот так:

Haskell

toNumbers :: Int -> [Int]
toNumbers n | n == 0 = []
            | otherwise = toNumbers (n `div` 10) ++ [n `mod` 10]
            
aList :: Int -> [Int]
aList n = (toNumbers n) ++ aList (n + 1)
 
numList :: [Int]
numList = aList 1

@Kurakov · 12.09.2013, 11:46

Ребят а можете более подробно расписать как и что происходит? Более-менее в хаскле уже соображаю, однако не все до конца понимаю.

Haskell

1
2
3

list1 :: Integer -> [Integer]
list1 0 = [ ]
list1 n = list1(n-1)++(n*2:[])

Возможно ли это переделать под бесконечный и как?

@Catstail · 12.09.2013, 11:56

Формируешь список последовательных четных... Но если нужен его конечный отрезок, то:

Haskell

Main> take 5 [2,4..]
[2,4,6,8,10]
Main> take 20 [2,4..]
[2,4,6,8,10,12,14,16,18,20,22,24,26,28,30,32,34,36,38,40]

Список [2,4..] бесконечен, но Хаскелл ленив, и вычислит только ту часть, которая нужна.

@Kurakov · 12.09.2013, 16:32

Catstail, Так в том то и дело, что без take надо сделать.

@Catstail · 12.09.2013, 16:45

А так:

Haskell

1 2	list2 :: Int -> [Int] list2 n = [2,4..(2*n)]

@Kurakov · 12.09.2013, 17:46

Catstail, Конечный цикл до n. Вот и я себе голову ломаю как сделать без take

@Catstail · 12.09.2013, 17:53

Сообщение от Kurakov

Конечный цикл до n.

- в последнем решении никаких циклов нет... И что значит "сделать без take"? Без использования take (свою реализацию сделать)?

@Kurakov · 15.09.2013, 18:32

Сообщение от Catstail

- в последнем решении никаких циклов нет... И что значит "сделать без take"? Без использования take (свою реализацию сделать)?

Но работа заканчивается n, а такого не должно быть.

Haskell

1 2	list5 :: [Integer] list5 = [n^5 \| n<-[1..]]

Я вот так сделал бесконечный.

@Catstail · 15.09.2013, 18:42

А, так нужно создать функцию, порождающую бесконечный список?

Haskell

1	listOfEven = [2,4..]

@xam max 3 / 3 / 2 Регистрация: 27.09.2009 Сообщений: 200
		1
	Создать бесконечный список символов, получающихся последовательной записью натуральных чисел 28.10.2012, 22:50. Показов 3238. Ответов 11 Метки нет (Все метки) Помогите пожалуйста с заданием, необходимо создать бесконечный список символов, получающихся последовательной записью натуральных чисел: [’1’,’2’,’3’,’4’,’5’,’6’,’7’,’8’,’9’,’1’,’0’,’1’,’1’,’1’,’2’,…], никак не могу подступиться к решению 0

@Kurakov 0 / 0 / 1 Регистрация: 02.07.2013 Сообщений: 25
	12.09.2013, 16:32	7
	Catstail, Так в том то и дело, что без take надо сделать. 0

@Kurakov 0 / 0 / 1 Регистрация: 02.07.2013 Сообщений: 25
	12.09.2013, 17:46	9
	Catstail, Конечный цикл до n. Вот и я себе голову ломаю как сделать без take 0

@Catstail Модератор 36601 / 20330 / 4220 Регистрация: 12.02.2012 Сообщений: 33,643 Записей в блоге: 13
	12.09.2013, 17:53	10
	Сообщение от Kurakov Конечный цикл до n. - в последнем решении никаких циклов нет... И что значит "сделать без take"? Без использования take (свою реализацию сделать)? 0

Создать бесконечный список символов, получающихся последовательной записью натуральных чисел

Решение