Запрос пользователяВ программе, сортирующей массив, допустили ошибку. Укажи номер строки, в которой допущена ошибка.
1 program prog;
2 var i, j, x, imax: integer;
3 arr: array [1..10] of integer;
4 begin
5randomize;
6 for i := 1 to 10 do arr[i] := random(100);
7for 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 := i;
12 x := arr[i];
13 arr[i] := arr[imax];
14 arr[imax] := x;
15 end;
16 end.
Запиши в поле ответа верную цифру.
Вычисли сумму третьего и пятого элементов массива
a
r
r
arr, после выполнения программы:
program prog;
var i, j, x, imax: integer;
arr: array [1..12] of integer = (27, 13, 16, 11, 14, 31, 22, 42, 16, 37, 12, 53);
begin
for i:=1 to 11 do begin
for j:=1 to 12-i do begin
if arr[j] < arr[j+1] then begin
x := arr[j];
arr[j] := arr[j+1];
arr[j+1] := x;
end;
end;
end;
end.
Запиши в поле ответа верное число.
Введи ответ
Определи, что будет выведено в результате работы программы, если ввести число
39
39:
program prog;
var i, x, j: integer;
const arr: array [1..10] of integer = (81, 39, 30, 95, 39, 50, 93, 89, 57, 7);
begin
j := 0;
readln(x);
for i := 1 to 10 do if arr[i] = x then j := i;
write(j);
end.
Запиши в поле ответа верное число.