Задание

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

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 := i;

10        for j := i + 1 to 10 do

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

12        x := arr[j];

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

14        arr[imax] := x;

15    end;

16 end.

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