Pascal, математика

[Eveze]

Eve[ze] (20:44:16 12/01/2010)
3.13. Дана матрица A(N, M). Получите Y = X1 . XN + X2 . XN-1 + ... + XN . X1 , где Xi –наибольший элемент в строке с номером i матрицы A.


Eve[ze] (20:44:35 12/01/2010)
4.6. Задано целое A>1. Найдите наименьшее целое неотрицательное k, при котором 5k>A.



Eve[ze] (20:44:44 12/01/2010)
5.2. Дана матрица B(N, N) . Получите вектор A(N) , компоненты которого находятся по пра-вилу: Ai равно первому по порядку положительному элементу в i-ой строке матрицы B (ес-ли таких элементов в строке нет, то примите Ai = -1).

Заранее благодарен откликнувшимся

[Eveze]

Сообщение от Eveze

Eve[ze] (20:44:16 12/01/2010)
3.13. Дана матрица A(N, M). Получите Y = X1 . XN + X2 . XN-1 + ... + XN . X1 , где Xi –наибольший элемент в строке с номером i матрицы A.



Заранее благодарен откликнувшимся

3.13 задача, выдает Syntax error, "Of" expected but "(" found, не пойму в чем дело. Жду помощт

max:array(1..N);
summ: integral;
for i=1 to N do begin
max(i):=A(i,1)
for j=1 to M do begin
if A(i,j)>max(i) then max(i)=A(i,j);
j:=j+1;
end;
i:=i+1;
end;
for i=1 to N do begin
summ:=summ+max(i)*max(N-i);
end.

[Сергeй]

Стучи в ICQ

[IT-man]

Стучите!сделаю!дешево!

[Stilet]

Syntax error,

Правильно выдает.
Смотри:
max:array(1..N) of integral судя по твоему коду.