Дан массив z(3,4).поменять в массиве второй столбец с четвёртым и вывести исходный массив и преобразованный в виде матриц

251

321

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

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

Dimatrubilov

Информатика

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

Const n = 3; m = 4; var z: array[1..n,1..m] of integer; i,j,b: integer; begin randomize; writeln('исходный массив: '); for i: = 1 to n do begin for j: = 1 to m do begin z[i,j]: =random(21)-10; write(z[i,j]: 3,' ') end; writeln; end; writeln; writeln('второй и четвёртый столбец переставлены: '); for i: = 1 to n do begin b: =z[i,2]; z[i,2]: =z[i,4]; z[i,4]: =b; end; for i: = 1 to n do begin for j: = 1 to m do write(z[i,j]: 3,' '); writeln; end; end. пример: исходный массив: -7 2 -2 3 9 -6 -6 1 -9 10 -9 3 второй и четвёртый столбец переставлены: -7 3 -2 2 9 1 -6 -6 -9 3 -9 10

Kuса

Информатика

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

|использовать робот алг нач цел а, б, с вывод "введите двузначное число", нс ввод а б : = div (а,10) с : = mod (а,10) вывод "сумма цифр числа ",а, " равна ", б+с, нс конне забудь поставить 5 звезд)