Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов > Языки программирования > Haskell
Перезагрузить страницу GetRest - возвращает список оставшихся несданными заданий
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
evilfelix evilfelix вне форума
Новичок
 
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 18.11.2010
По умолчанию GetRest - возвращает список оставшихся несданными заданий - 18.11.2010, 23:16

За время учебы в семестре студенты должны сдать определённое количество лабораторных работ, расчётно-графических заданий и рефератов. Лабораторная работа характеризуется названием предмета и номером, РГЗ - названием предмета, реферат - названием предмета и названием темы реферата. Разработайте тип данных, представляющий информацию по заданию. Учебный план студента представляет собой список, состоящий из пар, первый элемент который является заданием, а второй - номером недели, в которую он был сдан. Если задание еще не сдано, второй элемент пары должен быть пустым (используйте тип Maybe). Определите следующие функции:

getByTitle - вщзвращает задания, которые необходимо сдать по указанному предмету.

getReferats - возвращает список тем рефератов.

getRest - возвращает список оставшихся несданными заданий

getRestForWeek - возвращает список заданий, оставшихся несданными на указанной недели.

getPlot - создает список, состоящий из пар, первый элемент который равен номеру недели, а второй - количеству сданных на эту неделю заданий.
Ответить с цитированием
  (#2 (permalink)) Старый
calabi-yau calabi-yau вне форума
Member
 
Сообщений: 338
Сказал(а) спасибо: 0
Поблагодарили 10 раз(а) в 10 сообщениях
Регистрация: 28.09.2009
По умолчанию 19.11.2010, 11:51

haskell Код:
data E = Lab String Int
       | Sgj String
       | Ref String String
       deriving (Eq, Show)

type Plan = [ (Maybe Int, E) ]

title t = case t of
  Lab t _ -> t
  Ref t _ -> t
  Sgj t -> t

getByTitle t xs = [x | x @ (e, _) <- xs, title e == t]

getReferats xs = [s | (Ref _ s, _) <- xs]

getRest xs = [x | x @ (_, Nothing) <- xs]

getRestForWeek w xs = [x | x @ (_, w') <- xs, maybe True (w <) w']

getPlot xs =
  let
    aux ((_, x) : xs1) =
      let
        (x', res) = partition ((x ==) . snd) xs1
      in
       (succ (length x'), x) : aux res
    aux _ = []
  in
   aux $ filter (isJust . snd) xs


Don't fear the Monad
Ответить с цитированием
  (#3 (permalink)) Старый
mary-mpm mary-mpm вне форума
Новичок
 
Сообщений: 5
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 15.11.2010
По умолчанию 22.11.2010, 20:15

а вот мне интерпритатор пишет:
Syntax error in input (unexpected keyword "type")
тогда че делать?
Ответить с цитированием
  (#4 (permalink)) Старый
calabi-yau calabi-yau вне форума
Member
 
Сообщений: 338
Сказал(а) спасибо: 0
Поблагодарили 10 раз(а) в 10 сообщениях
Регистрация: 28.09.2009
По умолчанию 22.11.2010, 20:50

Цитата:
Сообщение от mary-mpm Посмотреть сообщение
а вот мне интерпритатор пишет:
Syntax error in input (unexpected keyword "type")
тогда че делать?
ммм... тут жаловались на то, что браузер может чего лишнего вставить в скопированный код. посмотрите, в коде не должно быть номеров строк, иных символов на их месте и все отступы сохранены.

upd: и да, в самом начале необходимо прописать
haskell Код:
import Data.Mybe
import Data.List


Don't fear the Monad
Ответить с цитированием
  (#5 (permalink)) Старый
mary-mpm mary-mpm вне форума
Новичок
 
Сообщений: 5
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 15.11.2010
По умолчанию 22.11.2010, 21:14

все проверила и прописала... теперь пишет...
Can't find imported module "Data.Mybe"
мне начинает казаться что у меня проблемы с интерпритатором...
Ответить с цитированием
Ads.
  (#6 (permalink)) Старый
calabi-yau calabi-yau вне форума
Member
 
Сообщений: 338
Сказал(а) спасибо: 0
Поблагодарили 10 раз(а) в 10 сообщениях
Регистрация: 28.09.2009
По умолчанию 22.11.2010, 21:18

Цитата:
Сообщение от mary-mpm Посмотреть сообщение
все проверила и прописала... теперь пишет...
Can't find imported module "Data.Mybe"
мне начинает казаться что у меня проблемы с интерпритатором...
ну специально ж дописал постом выше
Цитата:
Сообщение от calabi-yau Посмотреть сообщение
upd: и да, в самом начале необходимо прописать
haskell Код:
import Data.Mybe
import Data.List


Don't fear the Monad
Ответить с цитированием
  (#7 (permalink)) Старый
calabi-yau calabi-yau вне форума
Member
 
Сообщений: 338
Сказал(а) спасибо: 0
Поблагодарили 10 раз(а) в 10 сообщениях
Регистрация: 28.09.2009
По умолчанию 22.11.2010, 21:42

Цитата:
Сообщение от calabi-yau Посмотреть сообщение
ну специально ж дописал постом выше
моя ошибка.
haskell Код:
import Maybe
естественно.


Don't fear the Monad
Ответить с цитированием
  (#8 (permalink)) Старый
mary-mpm mary-mpm вне форума
Новичок
 
Сообщений: 5
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 15.11.2010
По умолчанию 24.11.2010, 03:04

теперь работает. спасибо большое))
Ответить с цитированием
  (#9 (permalink)) Старый
GrozaWW GrozaWW вне форума
Новичок
 
Сообщений: 1
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 05.12.2013
Unhappy 05.12.2013, 01:14

Люди, а кто-нибудь может сказать, как вводить данные? Что вводить блин после названия функции?
Ответить с цитированием
Ads
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Задан список произвольного уровня вложенности,превратить его в список атомов Дрон Lisp 6 19.11.2014 22:38
Требуется написать 20 заданий werovulv C++ Builder 1 05.06.2011 21:50
Задача на нахождение оставшихся работ по введенной текущей Willthorn Prolog 12 16.12.2010 15:39
программа которая берет список и создает список другой из этого же списка + исходный Ma3day Prolog 5 26.11.2010 15:40
Функция, по заданному списку карт возвращает список чисел Ghost92 Haskell 37 26.10.2010 19:37
Определить рекурсию, которая возвращает список hattation Lisp 3 10.02.2010 20:21
Задан список произвольного уровня вложенности, сформировать из него новый список Kolobov_Anton Lisp 3 26.03.2009 22:29
Планирование заданий с чего начать ComatoZZZ MSSQL Server 1 02.02.2008 15:19
Электронный журнал учета практических заданий Amorfis Мысли вслух 9 25.12.2006 08:11
Что все-таки возвращает конструктор Slava KPSS С/С++ 13 03.11.2005 10:14
Перехват заданий поступающих на принтер Alex Linch Visual C++ 0 25.07.2004 20:01



Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Нardforum.ru - компьютерный форум и программирование, форум программистов