Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
arsaeva73
03.09.2020 14:05 •
Информатика
Определить, в какой строке а(5,6) больше всего сумма элементов
Показать ответ
Ответ:
marinovamari1
21.07.2020 11:59
// F#
[<EntryPoint>]
let main argv =
let generateMatrix n m =
let rnd = System.Random()
Array2D.init n m (fun i j -> rnd.Next(10))
let inputArray = generateMatrix 5 6
printf "array: \n%A\n" (inputArray)
let maxIndex =
[1..Array2D.length1 inputArray]
|> Seq.map (fun row -> (row, inputArray.[row-1, *] |> Seq.sum))
|> Seq.maxBy (fun (i, sum) -> sum)
|> fst
printf "max index: %d" maxIndex
System.Console.ReadKey true |> ignore
0
0,0
(0 оценок)
Популярные вопросы: Информатика
Настюха20071
18.06.2022 12:04
Скорость передачи информации аналоговым модемом 16 кбит/с. за сколько секунд данный модем передаст информацию состоящую из 12288 символов, если каждый символ кодируется двумя...
ekaterinaf79
29.02.2020 01:24
Надо сделать в delphi 7 даны основания и высоты двух равнобедренных трапеций. найти сумму их периметров. (определите функцию для расчета периметра равнобедренной трапеции по ее...
Tytiki
14.08.2020 04:55
Крестьянин менял зайцев ! крестьянин менял зайцев на кур. брал за двух зайцев по три курицы. каждая курица снесла яиц столько, как третья часть всех куриц. продавая все яйца,...
dashutkazel1221
23.09.2020 19:33
Компьютерное время на первом этапе...
РомаУзденов
12.01.2022 19:06
Алфавит қуаты 64-ке тең. Әр парағы 256 символдан тұратын 128 парақты мәтінді сақтау үшін қанша Кб жады керек?...
ilyaneizvestno10
03.02.2022 10:54
Когда выйдет обнова на standoff 2 на Huawei App Gallery и на Apple store ? ...
Hitroymnik
24.12.2021 14:49
На уроці Мудрунчик встиг додати до нової презентації аж три нові слайди.Скільки ескізів слайдів стало на вказівці СЛАЙДИ?Обгрунтуйте відповідь....
belka0714
10.04.2021 18:09
. Что будет напечатано в результате работы следующей программы. (С полным объяснением)...
Monstrozacrs
26.09.2022 15:28
записать на языке программирования PASCAL: 1) соs|2,3a|-|sin7a| 2) sin²a²/3a 3) √tgx-0,3 4)5a-3,4/|1-a| 5)cos7a-sin a²/-a...
НезнайкаЛёша
14.12.2020 16:55
До какого числа должно измениться значение счетчика i в фрагменте программы, чтобы А стало равным 120? A:=1; for i:=2 to … do A:=A*i;...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
[<EntryPoint>]
let main argv =
let generateMatrix n m =
let rnd = System.Random()
Array2D.init n m (fun i j -> rnd.Next(10))
let inputArray = generateMatrix 5 6
printf "array: \n%A\n" (inputArray)
let maxIndex =
[1..Array2D.length1 inputArray]
|> Seq.map (fun row -> (row, inputArray.[row-1, *] |> Seq.sum))
|> Seq.maxBy (fun (i, sum) -> sum)
|> fst
printf "max index: %d" maxIndex
System.Console.ReadKey true |> ignore
0