Задан список чисел

@gleeeebus · Регистрация: 27.12.2015

Задан список чисел Название: image006.gif
Просмотров: 27

Размер: 248 байт

. Вычислить Название: image008.gif
Просмотров: 27

Размер: 133 байт

, где - сумма элементов списка; Название: image010.gif
Просмотров: 27

Размер: 142 байт

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

@Curry · 18.05.2017, 15:29

Haskell

y :: Floating a => [a] -> a
y l = sum l / product l
 
main :: IO () 
main = do
    print $ y [1.2 :: Double , 3.4, 5.6, 7.8]

@Catstail · 18.05.2017, 16:47

Haskell

1 2	task x = (s/p) where (s,p)=foldl (\ (ss,pp) x -> (ss+x,pp*x)) (0,1) x

@gleeeebus 0 / 0 / 0 Регистрация: 27.12.2015 Сообщений: 2
		1
	Задан список чисел 18.05.2017, 13:25. Показов 1265. Ответов 2 Метки нет (Все метки) Задан список чисел. Вычислить , где - сумма элементов списка; - произведение элементов списка. 0

	18.05.2017, 16:47