Помогите с задачей с матрицами пожалуйста!!!

@Анастасия2003 · Регистрация: 04.11.2011

Студворк — интернет-сервис помощи студентам

На основе использования функционалов разработать функцию : Определить ряд матрицы, который содержит элементы с максимальным значением их суммы. Результат представить в виде (Номер ряда.Сумма)

transformator.t · 05.11.2011, 12:24

Lisp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
(defun max-line-array (solid)
       (let* ((x 0) (y 0) (res (labels ((fn (x y)
                        (if (= x (car (array-dimensions solid))) ()
                        (cons (labels ((fn1 (x y)
                                 (if (= y (second (array-dimensions solid))) 0
                                     (+ (aref solid x y)
                                    (fn1 x (1+ y))))))
                            (fn1 x y))
                              (fn (1+ x) y)))))
                   (fn x y))))
           (cons (apply #'max res)
             (labels ((fn3 (l n)
                  (cond ((null l) n)
                    ((= (car l) (apply #'max l)) n)
                    (t (fn3 (cdr l) (1+ n))))))
               (fn3 res 0)))))

на вход передать заполненный массив, например -

Lisp
1
2
3
4
5
6
7
8
9
10
CL-USER> mass1
#2A((2 25 96 58 67 92 7)
    (99 19 88 22 23 37 0)
    (0 0 82 87 84 39 0)
    (28 26 33 29 69 59 0)
    (18 27 47 57 199 2 0)
    (88 41 8 2 74 59 0))
CL-USER> (max-line-array mass1)
(350 . 4)
CL-USER>

т.е. ряд - 4, сумма ряда 350.

transformator.t · 05.11.2011, 13:26

VH, как это применимо к массиву?
к списку с подсписками да, к array нет)

@VH · 05.11.2011, 19:20

Lisp
1
2
3
4
5
6
7
8
9
(defun F (M)
 (if M
  (let
   ((sum (apply '+ (car M)))
    (result (F (cdr M))))
   (cond
    ((null result) (cons 0 sum))
    ((> sum (cdr result)) (cons 0 sum))
    (T (cons (1+ (car result)) (cdr result)))))))

>transformator.t
В задании про "массив" ничего не сказано.

transformator.t · 05.11.2011, 19:27

Сообщение от Анастасия2003

Определить ряд матрицы

Количество используемых индексов массива может быть различным. Массивы с одним индексом называют одномерными, с двумя — двумерными и т. д. Одномерный массив нестрого соответствует вектору в математике, двумерный — матрице. Чаще всего применяются массивы с одним или двумя индексами, реже — с тремя, ещё большее количество индексов встречается крайне редко.
http://ru.wikipedia.org/wiki/%... 0%B8%D0%B2

поэтому сразу про array и подумал.

@VH · 05.11.2011, 20:07

В ортодоксальном LISPе кроме атомов и списков вообще других типов данных нет - и оказывается, что их достаточно. Так зачем нам с Вами синтаксический сахар?

transformator.t · 05.11.2011, 20:35

VH, если есть время, перепишите свой пример на основе массива, а я сравню со своим и отработаю свои ошибки.

Новые блоги и статьи Все статьи Все блоги /
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Рецензия / Мнение Это мой обзор планшета X220 с точки зрения школьника. Недавно я решила попытаться уменьшить свой. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .

@Анастасия2003 0 / 0 / 0 Регистрация: 04.11.2011 Сообщений: 5

	Помогите с задачей с матрицами пожалуйста!!! 04.11.2011, 23:48. Показов 1111. Ответов 6 Метки нет (Все метки) На основе использования функционалов разработать функцию : Определить ряд матрицы, который содержит элементы с максимальным значением их суммы. Результат представить в виде (Номер ряда.Сумма) 0

transformator.t defun 603 / 617 / 44 Регистрация: 30.04.2011 Сообщений: 702
	05.11.2011, 13:26
	VH, как это применимо к массиву? к списку с подсписками да, к array нет) 0

@VH 431 / 259 / 23 Регистрация: 23.11.2010 Сообщений: 278
	05.11.2011, 20:07
	В ортодоксальном LISPе кроме атомов и списков вообще других типов данных нет - и оказывается, что их достаточно. Так зачем нам с Вами синтаксический сахар? 0

transformator.t defun 603 / 617 / 44 Регистрация: 30.04.2011 Сообщений: 702
	05.11.2011, 20:35
	VH, если есть время, перепишите свой пример на основе массива, а я сравню со своим и отработаю свои ошибки. 0