Выбрать строку с наибольшей суммой элементов

Andrei1234

Задана матрица Z(6,5). Выбрать строку с наибольшей суммой элементов и вывести элементы этой строки в вектор, затем каждый отрицательный элемент умножить на номер столбца. Вывести результат в виде матрицы и вектора.
6 ответов

Andrei1234

Как запостить тему, чтобы не получить ответ
3. Обязательно добавьте в теме фразу "Срочно надо! Завтра сдавать!" Про вас сразу подумают, что вы несколько месяцев занимались фигнёй и вспомнили о задании только за день до сдачи. Отношение к беспамятному лодырю не сильно отличается от отношения к тупому и безграмотному.


Andrei1234

начало знаю как делать но она не до конца
program z15;
var a: array[1..6, 1..5] of integer;
var sum: array [1..6] of integer;
var  i, j, max: integer;
begin
for i:=1 to 6 do
for j:=1 to 5 do a[i,j]:=random(20);
writeln ('полученный массив');
for i:=1 to 6 do 
begin
for j:=1 to 5 do write(a[i,j],' ');
writeln('');
end;   
for i:=1 to 6 do 
begin
sum[i]:=0;
for j:=1 to 5 do  sum[i]:=sum[i]+a[i,j];
end;
max:=sum[1];
for i:=2 to 6 do
if sum[i]>max then max:=sum[i];   
writeln('Макс. сумма=',max);
end.


Andrei1234

for j:=1 to 5 do a[i,j]:=random(20);
Диапазон для рандома должен находится и в отрицательной области тоже! Это видно из условия задачи.Начало хорошее, но не без огрехов. Например, в самом конце, Вы ищите максимальную сумму в строках без привязки этой суммы к конкретной строке, из которой она получилась. А ведь именно эту строку, с максимальной суммой, необходимо вывести в вектор (кстати, а где массив для вектора?), а как Вы её выведите, не зная где она?


Andrei1234

Я сильно не разбираюсь, только начел учить паскаль. А задание задали такое. Второй день голову ломаю.


Andrei1234

задание дали в понедельник


Andrei1234

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