Прочитай условие задания и выполни его. Дана программа, сортирующая массив в порядке невозрастания. Укажи номера строк, в которых осуществляется поиск максимального элемента в неотсортированной части массива. 1 program pr; 2 var i, j, x, imax: integer; 3 arr: array [1..10] of integer = (73, 60, 10, 11, 52, 98, 94, 21, 39, 12); 4 begin 5 for i := 1 to 10 do 6 begin 7 imax := i; 8 for j := i + 1 to 10 do 9 if arr[j] > arr[imax] then imax := j; 10 x := arr[i]; 11 arr[i] := arr[imax]; 12 arr[imax] := x; 13 end; 14 for i := 1 to 10 do write(arr[i], ', ') 15 end. $2$ $3$ $7$–$9$ $10$–$12$ $14$
Задание

Прочитай условие задания и выполни его.

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

1 program pr;

2 var i, j, x, imax: integer;

3    arr: array [1..10] of integer = (73, 60, 10, 11, 52, 98, 94, 21, 39, 12);

4 begin

5   for i := 1 to 10 do

6    begin

7       imax := i;

8        for j := i + 1 to 10 do

9           if arr[j] > arr[imax] then imax := j;

10        x := arr[i];

11        arr[i] := arr[imax];

12        arr[imax] := x;

13    end;

14    for i := 1 to 10 do write(arr[i], ', ')

15 end.

Выбери верный вариант.

  • \(2\)
  • \(3\)
  • \(7\)–\(9\)
  • \(10\)–\(12\)
  • \(14\)