Паскаль авс в каждой строке двумерного массива поменять местами первый элемент и любой из максимальных. использовать только циклы, без функция и т.п.

232

332

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

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

ksenia1unicorn

Информатика

4,8(74 оценок)

var a[1..5,1..5] of integer; b,i,j,l: integer;

begin

// считываешь элементы массива. сама справишься.

for i: =1 to 5 do

for j: =2 to 5 do

if a[i,1]< a[i,j] then a[i,1]: =a[i,j];

for i: =1 to 5 do begin

for j: =1 to 5 do

write(a[i,j],' ');

writeln;

end;

end.

lightningwhite

Информатика

4,4(53 оценок)

Следуя этому алгоритму у меня получилось всего 3 цыпочки.

150 000+ пользователей

Оформить подписку