Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 30.10.2012, 15:12   #1
Sega_AS
Пользователь
 
Регистрация: 22.02.2012
Сообщений: 15
По умолчанию F# Написать функцию находяшую моду чисел

Грубо есть генерированный массив с большим количеством повторяющиеся чисел и нужно найти моду чисел с помощью функциональной части языка.... Тобиш используя только Array.fold , List.exists, List.maxBy,comprehensions.

Последний раз редактировалось Sega_AS; 30.10.2012 в 15:16.
Sega_AS вне форума Ответить с цитированием
Старый 30.10.2012, 15:25   #2
Abstraction
Старожил
 
Аватар для Abstraction
 
Регистрация: 25.10.2011
Сообщений: 3,178
По умолчанию

В F#, вообще-то, функциональная часть - это весь язык. Как-то так для массива нечётной длины...

Код:
let sortedArray = Array.sort array
let modaPosition = (Array.fold(fun acc elem -> acc + 1) 0 array) / 2
Array.get sortedArray modaPosition
Abstraction вне форума Ответить с цитированием
Старый 31.10.2012, 19:48   #3
Sega_AS
Пользователь
 
Регистрация: 22.02.2012
Сообщений: 15
По умолчанию

Цитата:
Сообщение от Abstraction Посмотреть сообщение
В F#, вообще-то, функциональная часть - это весь язык. Как-то так для массива нечётной длины...

Код:
let sortedArray = Array.sort array
let modaPosition = (Array.fold(fun acc elem -> acc + 1) 0 array) / 2
Array.get sortedArray modaPosition

Сломал голову зачем /2

понял массив нечётной длинны....

Последний раз редактировалось Sega_AS; 31.10.2012 в 20:03.
Sega_AS вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Написать функцию булевского(целого) типа, определяющую упорядоченность массива целых чисел Anando Паскаль, Turbo Pascal, PascalABC.NET 16 23.09.2011 13:26
Написать функцию arccos x и для заданных вещественных чисел x и y подсчитать (x/1+|x|)+arccos y/sqr(y)-1. "Chika bomb" Паскаль, Turbo Pascal, PascalABC.NET 3 14.12.2010 16:03
Написать функцию нахождения наибольший общий делителя двух натуральных чисел. DrDre9991 Помощь студентам 16 14.10.2010 12:41
Помощь Рхл-моду Apatch Фриланс 2 08.05.2009 13:34
Помогите написать прогу!Среди заданных целых чисел k, l, m найти пары кратных.Написать по проще чемЭесть vdv08 Паскаль, Turbo Pascal, PascalABC.NET 4 04.04.2008 16:56