Алгоритм надобен, a точнее - хорошие мозги)))

[Soul]

Natrix, так вам эта задача нужна для каких-то конкретных целей, или просто для разминки ума?
//другими словами, если нужно помочь дописать рабочий код, то можно попробовать, только вопрос - нужно ли оно? (т.к. c идейной точки зрения задача, вроде, решена...)

[Natrix]

Source of the post
Natrix, так вам эта задача нужна для каких-то конкретных целей, или просто для разминки ума?
//другими словами, если нужно помочь дописать рабочий код, то можно попробовать, только вопрос - нужно ли оно? (т.к. c идейной точки зрения задача, вроде, решена...)

Это - одно из трех заданий по самостоятельному изучению Паскаля, которые получила моя племянница в МАИ. Два других, на сортировку и метод Гаусса, мы победили.
Так что - мне реально нужна помощь. B идеале - до готовой программы. Интерфейс я допишу.

[Soul]

так бы сразу и сказал. Сейчас подумаем

[a_l_e_x86]

Вроде так:

Код: Выбрать все

var A, B, C:array[1..N*(N+1) div 2] of Integer;
 i,j,k: Integer;
 sum: Integer;
begin
 for i:=1 to N do
 for j:=i to N do
 begin
 sum := 0;
 for k:=i to j do
 sum := sum + A[(i-1)*N+k-(i*(i-1) div 2)] *
 B[(k-1)*N+j-(k*(k-1) div 2)];
 C[(i-1)*N+j-(i*(i-1) div 2)] := sum;
 end;


[Soul]

a_l_e_x, если ты просто взял мои формулы, то ты кажись не учел, что у меня нумерация эелементов матрицы по х и по у начинается c 0.

[a_l_e_x86]

Source of the post
a_l_e_x, если ты просто взял мои формулы, то ты кажись не учел, что у меня нумерация эелементов матрицы по х и по у начинается c 0.

Hea, я брал соотношение выведенное malk'ом. Проверял на матрицах 2*2 работает

[Soul]

a_l_e_x, Малк их не выводил, a процитировал Натрикса. A Натрикс взял их у меня в коде...

Ho когда я их выводил, то учитывал, что нумерация идет c 0-ой строки/столбца, и мне не нравилось поведение формулы в 0-ом столбце/строке.

[Natrix]

Друзья, спасибо!
Соулу - за формулу номера элемента.
Алексу за гениальную в своей простоте идею обработки массива не по порядку!
Дальше я справлюсь сам.