И опять матрици...., задачка Опции

[Alex7]

Короче тут попалась задачка все нп те-же матрици. Как бы неичего сложного, но оранизовать цикл, в котором идет вычисление, так и не смог
Условие ее следуюшее:

З клавиатуры ввести прямоугольную матрицу дейчтвительных чисел( максимальный размер- 22х15) Определить и напечатать номера двух строчек, введеной матрици, скалярное произведение который наибольшее.[Скалярное произведение- сумма попарных произведений одинаковых по номерам елементов этих векторов]

Буду очень благодарен за помощь, да, тут девчонка, сидит рядом со мной(ее задачка то) тоже говорит что будет благодарна!

[Alex7]

Огромное спасибо, что не позволили мне опозорится))). Никак не мог включить варилку мозгов, когда рядом сидит такая фигурка... Это ещ детство играет наверное
Все работает, доделано, все остались доаольны, А теперь, чтобы я таки в следующий раз, даже при таких обстоятельствах мог сам решить задачку.....

в Паскале есть такая константа, определяет максимальное число, которое можно затолкнуть в Integer... А минус - для того, чтобы первое же найденное произведение было гарантированно больше этого числа...

Понятно, значит это вроде функции.да?
Только я не понимаю, если это макс, то как "первое же найденное произведение" может быть больше его, даже если и будет longint ? А, или ты може имеешь ввиду нижнюю границу- максимальное минимальное число для Int ?

for k := 1 to n_rows do
      scalar := scalar + a[i, k]*a[j, k];

А этим циклом мы находим скалярое двух строчек ? Если да, то значит я главный цикл понял, только всеравно сразу б его стопудово не написал б! Сложновато ме еще( Не хватает опыта работы ...