целочисленный массив

[zzz6]

Дан целочисленный массив А[1..4,1..5]. Требуется преобразовать матрицу: поэлементно вычесть последнюю строку из всех строк, кроме последней.

[Mandrivnyk]

Ну и что же тут такого ""?
Начни с самого начала -- создай и заполни матрицу, потом в двойном цикле ее обработай.
Напиши и запости код. Будут ошибки -- поправим -)

[zzz6]

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

Ну и что же тут такого ""?
Начни с самого начала -- создай и заполни матрицу, потом в двойном цикле ее обработай.
Напиши и запости код. Будут ошибки -- поправим -)

program fg;
 uses crt;
 const n=4; m=5;
 var a:array [1..n,1..m] of real;
 raz:array [1..m] of real;
 i,j:integer;
 begin
 writeln('Èñõîäíàÿ ìàòðèöà:');
 randomize;
 for i:=1 to n do
 begin
 for j:=1 to m do
 begin
 a[i,j]:=random(20)+1;
 write(a[i,j],' ');
 end;
 writeln;
 end;
 writeln('Ïîëó÷åííàÿ ìàòðèöà:');
 for i:=1 to n-1 do
 for j:=1 to m do
 a[i,j]:=a[i,j]-a[n,j];
 for i:=1 to n do
 begin
 for j:=1 to m do
 begin
 write(a[i,j],' ');
 end;
 writeln;
 end;
 end.

так?



___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.

[Mandrivnyk]

Будь добр, отформатируй код (кнопочка с октоторпом -- решеткой), а то разбирать чужой код, да еще и неотформатированный -- занятие не из приятных -)

raz:array [1..m] of real;

этот массив для чего?

Update
Ага. Код отформатировал модератор, за что ему (ей) большое человеческое спасибо -)
Вроде бы, все правильно. Сам-то проверял результат работы? Вычисления-то простые, будет сразу заметно, если что не так.
Вопрос про массив raz остался. Он зачем?

[Serge_Bliznykov]

raz:array [1..m] of real;

этот массив для чего?

я на 99.9% уверен, что ни для чего... Бывает, что лишние переменные появляются..
думаю, что эту строчку надо просто удалить и всё.