begin Randomize; for i := 1 to n do for j := 1 to n do X[i,j] := Random(100); for i := 1 to n do begin IndMax := 1; max :=X[i,1]; for j := 2 to n do begin if X[i,j]>max then begin max := X[i,j]; //Наибольший элемент строки с номером i IndMax := j; //Столбец, в котором находится наибольший элемент строки //с номером i end; end; //Смена элементов X[i,IndMax] := X[i,i]; X[i,i] := max; end; end;

0 0

4 года назад

Помогите!!! Пойдёт ли гта 5 на ноутбуке toshiba and 4400m 2.7gh 5gb ОЗУ и 512мб видеопамяти

Николай 64 [1]

Не пойдёт потому что это устройство для обычных пользователей а не для играющих в игры. Нужен другой ноутбук и потому в ноутбуке toshiba мало памяти для видосиков.

0 0

4 года назад

Прочитать ещё 2 ответа

программист Василий Кадров недавно получил банковскую карточку.Чтобы не забыть пароль к карточке, Василий решил построить его по

Sonya Minn [4]

чисел - 10000

Каждое тринадцатое число делится на 13

значит надо 10000 поделить на 13, получается 769

теперь числа что делятся на 17, 10000 поделить на 17, получается 588

10000-588-769=8643

0 0

1 год назад