Форум программистов, компьютерный форум, киберфорум
F# .NET
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.64/11: Рейтинг темы: голосов - 11, средняя оценка - 4.64
1 / 1 / 0
Регистрация: 18.12.2012
Сообщений: 12
1

Дан список чисел, составить все подмножества этого списка

12.05.2015, 18:55. Показов 2208. Ответов 5
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Дан список чисел, составить все подмножества этого списка.
Нашел код среди тем, но когда запускаю, выходит ошибка. Кто знает в чем дело?
Код программы:
F#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
>let rec subset l =
    match l with
    | [] -> [[]]
    | (x::xs) ->
                let second = subset xs in
                List.append (List.map(fun y -> x::y) second) second;;
 
val subset : 'a list -> 'a list list = <fun>
 
>let set = [1;2;3;4];;
 
val set : int list = [1; 2; 3;4]
 
>subset set;;
 
- : int list list = [[1; 2; 3; 4]; [1; 2; 3]; [1; 2; 4]; [1; 2]; [1; 3; 4]; [1; 3]; [1; 4]; [1]; [2; 3; 4]; [2; 3]; [2; 4]; [2]; [3; 4]; [3]; [4]; []]
Добавлено через 1 час 3 минуты
А именно пишет то что "Недопустимое ключевое слово val в выражении. Требуется неполный..."
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.05.2015, 18:55
Ответы с готовыми решениями:

Составить все подмножества заданного списка
Дан список чисел, составить все подмножества этого списка.

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

Дан список, содержащий целые числа. определить количество различных элементов этого списка
...

Имеется список слов. Составить список различных слов этого списка с указанием частоты их появления в списке
Имеется список слов. Составить список различных слов этого списка с указанием частоты их появления...

5
Заблокирован
12.05.2015, 20:09 2
Лучший ответ Сообщение было отмечено Ev_Hyper как решение

Решение

Stalkc, это взято из F# Interactive. Я уже приводил ссылку на подробный материал:
https://msdn.microsoft.com/ru-... 33175.aspx

Выберу оттуда основное:

"F# Interactive (fsi.exe) используется для интерактивного запуска кода F# в консоли или для выполнения скриптов F#. Другими словами, F# Interactive выполняет команду REPL (Read-Evaluate-Print Loop) – цикл: чтение-вычисление-вывод) для языка F#."

Для запуска F# Interactive через Visual Studio используйте сочетание клавиш CTRL+ALT+F.
В VS F# Interactive появится внизу:

Дан список чисел, составить все подмножества этого списка


"Интерактивный режим F# попытается скомпилировать файл и, в случае удачи, выполнит код и напечатает сигнатуру типов и значений, которые он скомпилировал. В случае ошибки интерпретатор напечатает сообщения об ошибке."

Попробуйте вставить вот эту часть кода:

F#
1
2
3
4
5
6
>let rec subset l =
    match l with
    | [] -> [[]]
    | (x::xs) ->
                let second = subset xs in
                List.append (List.map(fun y -> x::y) second) second;;
Вы получите следующий результат:
F#
1
val subset : l:'a list -> 'a list list
это и есть сигнатура. По ней вы можете понять типы входных параметров и возвращаемого значения.

теперь вставьте следующую строчку, но допустите в неё ошибку. Например, поставьте вместо ";" ",":
F#
1
2
3
4
5
6
7
8
9
> let set = [1,2;3;4];;
 
  let set = [1,2;3;4];;
  ---------------^
 
stdin(7,16): error FS0001: В данном выражении требовалось наличие типа
    int * int    
, но получен тип
    int
Эти сообщения помогут вам в исправлениях допущенных неточностей.

Надеюсь, теперь этот вопрос немного прояснился.
2
1195 / 588 / 88
Регистрация: 20.09.2012
Сообщений: 1,881
12.05.2015, 21:48 3
Цитата Сообщение от Ev_Hyper Посмотреть сообщение
REPL (чтение, оценка, цикл печати)
чтение , вычисление , печать , в цикле (повтор сначала)
Интерактивный режим F# попытается скомпилировать файл
не совсем.
Alt-Enter выполняет выделенный тескт окне редактирования.
Alt-' выполняет текущую строку и переходит на следующую
1
Заблокирован
12.05.2015, 22:07 4
Цитата Сообщение от pycture Посмотреть сообщение
чтение , вычисление , печать , в цикле (повтор сначала)
Спасибо, поправлю - непосмотрел на качество перевода мсдн. Но в принципе сокращение читаемое.

Цитата Сообщение от pycture Посмотреть сообщение
не совсем.
а вот тут не понял. Как будет правильнее?
0
1195 / 588 / 88
Регистрация: 20.09.2012
Сообщений: 1,881
12.05.2015, 22:16 5
Цитата Сообщение от Ev_Hyper Посмотреть сообщение
Как будет правильнее?
ну т.е. он не обязательно пытается скомпилировать файл.
он может загрузить и скомпилировать файл (через #l вроде), а может скомпилировать отдельные строки или выделенный текст из текущего окна редактирования сочетаниями клавиш которые я дал выше
0
Заблокирован
12.05.2015, 22:19 6
Цитата Сообщение от pycture Посмотреть сообщение
ну т.е. он не обязательно пытается скомпилировать файл.
он может загрузить и скомпилировать файл, а может скомпилировать отдельные строки из текущего окна редактирования сочетаниями клавиш которые я дал выше
а, это думаю и так понятно
0
12.05.2015, 22:19
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.05.2015, 22:19
Помогаю со студенческими работами здесь

Дан список из 10 целых чисел. Составить программу, вычисляющую сумму всех чисел, начинающихся на 1
Доброго времени суток, уважаемые! Помогите пожалуйста студенту... Сама задачка собственно в...

Дан список из 10 целых чисел. Составить программу, вычисляющую сумму всех положительных нечетных чисел.
Здравствуйте дорогие друзья! Я слезно прошу помощи... Задачки небольшие но ЛИСП мне не дается к...

Принять список целых чисел в качестве аргумента и напечатать среднее значение элементов этого списка
Напишите функцию print_average(arr), которая принимает список целых чисел в качестве аргумента и...

программа которая берет список и создает список другой из этого же списка + тот же список без последнего элемента
надо написать программу которая берет список и создает список другой из этого же списка + тот же...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru