Регистрация
polisha014
01.06.2021 09:48
Информатика
Есть ответ 👍

Найти сумму элементов квадратной матрицы a(4,4),расположенных выше побочной диагонали.алгоритм на паскаль. 20 )

205
344
Посмотреть ответы 3

Ответы на вопрос:

linakn14
linakn14
4,5(13 оценок)

program pr;

var

a: array[1..4,1..4] of integer;

i,k,sum,j: integer;

begin

writeln('ввод значений матрицы(горизонтально по )');

for i: =1 to 4 do

begin

for k: =1 to 4 do

  begin

  readln(a[i, k]);

  end;

end;

writeln('получившаяся матрица: ');

for i: =1 to 4 do

begin

for k: =1 to 4 do

  begin

  write(a[i, k]);

  end;

  writeln();

end;

 

sum: =0;

j: =4;

for i: =1 to 4 do

begin

for k: =1 to 4 do

  begin

  if k

  end;

  j: =j-1;

end;

writeln('сумма: ',sum);

end.

вовчик83
вовчик83
4,8(20 оценок)

ответ:

функция..

объяснение:

function arrsum(a: array[1..4,1..4] of real): real;

var

x,y: integer;

sum: real;

begin

sum: =0;

for x: =1 to 3 do

for y: =1 to (4-x) do

sum: =sum+a[x,y];

result: =sum;

end;

Elika34
Elika34
4,6(43 оценок)

И что надо сделать? А то непонятно

Популярно: Информатика