profile
Опубликовано 6 лет назад по предмету Информатика от natali7456

Дана матрица А(3,3). В строках с отрицательным элементом на главной диагонали найти суммы всех элементов. Вывести номера строк, суммы, а так же матрицу А по строкам.
Паскаль

  1. Ответ
    Ответ дан MagAragorn
    var a,b,i,min,j,sum:longint;
    m:array[1..3,1..3] of longint;
    begin
    for i:=1 to 3 do
    for j:= 1 to 3 do
    read(m[i,j]);
    for i:=1 to 3 do
    if m[i,i]< 0 then
    begin
    for j:=1 to 3 do
    sum:=sum+m[i,j];
    writeln(i,' ',sum);
    sum:=0;
    end;
    for i:=1 to 3 do
    begin
    writeln;
    for j:= 1 to 3 do
    write(m[i,j],' ');
    end;
    end.
Самые новые вопросы