Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов > Языки программирования > Haskell
Перезагрузить страницу Как просуммировать все цифры спискa?
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
Tatika Tatika вне форума
Новичок
 
Сообщений: 8
Сказал(а) спасибо: 3
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 05.05.2017
По умолчанию Как просуммировать все цифры спискa? - 07.05.2017, 22:53

import Data.Char
function2 :: String ->[Int]
function2 "" = []
function2 (x:xs) = (if isDigit x then digitToInt x else 0) : function2 xs

Функция, которая суммирует все цифры стринга... Как мне же их просуммировать? Помогите, пожалуйста, как и куда мне встроить sum?
Ответить с цитированием
  (#2 (permalink)) Старый
Tatika Tatika вне форума
Новичок
 
Сообщений: 8
Сказал(а) спасибо: 3
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 05.05.2017
По умолчанию 07.05.2017, 22:54

haskell Код:
import Data.Char
function2 :: String ->[Int]
function2 "" = []
function2 (x:xs) = (if isDigit x then digitToInt x else 0) : function2 xs
Ответить с цитированием
  (#3 (permalink)) Старый
Alexiski Alexiski вне форума
Любитель давать советы
 
Сообщений: 4,228
Сказал(а) спасибо: 25
Поблагодарили 49 раз(а) в 49 сообщениях
Регистрация: 16.10.2005
По умолчанию 08.05.2017, 06:43

Просуммируйте список, который возвращает function2 :)
haskell Код:
function1 :: String -> Int
function1 = sum . function2

А если переделывать function2, то замените пустой список на нуль, а операцию (:) на сложение
Ответить с цитированием
Пользователь сказал cпасибо:
Tatika (08.05.2017)
  (#4 (permalink)) Старый
Tatika Tatika вне форума
Новичок
 
Сообщений: 8
Сказал(а) спасибо: 3
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 05.05.2017
По умолчанию 08.05.2017, 16:51

Ясно! Спасибо Вам!

А как просуммировать кортежи каждого второго элемента списка?
как в таком примере:
[('2', (2,3,1), ('C', (3,3,1), ('2', (3,3,1), ('G', (1,1,1)] с результатом (3+3+1) + (1+1+1) = 10
Ответить с цитированием
  (#5 (permalink)) Старый
Tatika Tatika вне форума
Новичок
 
Сообщений: 8
Сказал(а) спасибо: 3
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 05.05.2017
По умолчанию 08.05.2017, 17:30

вопрос решен , спасибо!
Ответить с цитированием
Ads.
Ads
Ответ

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

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сломалась USB клавиатура, не работают цифры. CB111 Любые вопросы от новичков 28 11.04.2014 11:59
Римские цифры в Лиспе Student_22 Lisp 12 19.03.2013 09:58
Разные цифры Ynochka91 Pascal 0 17.12.2011 19:46
Что такое рандомные цифры и буквы Euxenit C++ на Unix 0 11.01.2011 21:21
Как поменять местами первые две цифры sabotein Visual Basic 3 22.11.2010 16:57
Ищем цифры на картинках Vovik-ukr Зацените! 5 08.09.2009 12:54
Нахождение минимальной цифры числа Romario2008 Prolog 3 15.04.2009 00:30
Меняющиеся цифры с разной частотой Konstantin_01 С/С++ 4 14.08.2008 16:54
Как обрезать лишние цифры edward24 DHTML, JavaScript, VBScript 3 19.09.2006 21:41
Как поставить цифры в массиве mig3i Assembler 1 16.06.2006 14:37
Цифры зашифрованы символами VladimirStud Prolog 4 22.12.2005 01:40
Автоматическое изменение цифры Незнайка Первый PHP 2 02.02.2003 05:26



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