Дан целочисленный двумерный массив, размерности n х m. сформировать новый массив, состоящий из противоположных соответствующих элементов . в паскале. 20 .

181

378

Посмотреть ответы 2

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

malinovaya14

Информатика

4,7(79 оценок)

Var mas_in, mas_out : array [1..100,1..100] of integer; n,m,i,j: integer; begin write('введите количество строк n='); readln(n); write('введите количество столбцов m='); readln(m); for i: =1 to n do for j: =1 to m do mas_in[i,j]: =random(99); //mas_in[i,j]: =i*(j+i); writeln('исходная матрица'); for i: =1 to n do begin for j: =1 to m do write(mas_in[i,j]: 2,' '); writeln; end; for i: =1 to n do begin for j: =1 to m do mas_out[i,j]: =mas_in[i,m-j+1]; end; writeln('конечная матрица'); for i: =1 to n do begin for j: =1 to m do write(mas_out[i,j]: 2,' '); writeln; end; end.