В программе, сортирующей массив, допустили ошибку. Укажи номер строки, в которой допущена ошибка. 1 program prog; 2 var i, j, x, imax: integer; 3 arr: array [1..10] of integer; 4 begin 5 randomize; 6 for i := 1 to 10 do arr[i] := random(100); 7 for i := 1 to 9 do 8 begin 9 imax := 1; 10 for j := i + 1 to 10 do 11 if arr[j] < arr[imax] then imax := j; 12 x := arr[i]; 13 arr[i] := arr[imax]; 14 arr[imax] := x; 15 end; 16 end. Запиши в поле ответа верную цифру.
Задание

В программе, сортирующей массив, допустили ошибку. Укажи номер строки, в которой допущена ошибка.

1 program prog;

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

3    arr: array [1..10] of integer;

4 begin

5    randomize;

6    for i := 1 to 10 do arr[i] := random(100);

7    for i := 1 to 9 do

8    begin

9        imax := 1;

10        for j := i + 1 to 10 do

11            if arr[j] < arr[imax] then imax := j;

12        x := arr[i];

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

14        arr[imax] := x;

15    end;

16 end.

Запиши в поле ответа верную цифру.

[ ]