(смотрите рисунок)
AC=ADEC=3+1+1=5
ответ 2) 5
Все элементы будут равны единице.
Сначала они будут заполнены значением, большим своего индекса на 1, а потом каждому элементу, начиная со второго (который А[1]) будет присвоено значение предыдущего элемента и 1 распространится везде.
Для проверки была написана программа с отладочной выдачей.
var
a:array[0..10] of integer;
i:integer;
begin
for i:=0 to 10 do begin a[i]:=i+1; Write(a[i],' ') end;
Writeln;
Write(a[0],' ');
for i:=1 to 10 do begin a[i]:=a[i-1]; Write(a[i],' ') end
end.
Результаты
1 2 3 4 5 6 7 8 9 10 11
1 1 1 1 1 1 1 1 1 1 1
Ответ: 3)
Алгоритм приготовки чая
1)взять чайник
2)открыть крышку чайника
3)открыть кран
4)налить воду в чайник
5)закрыть кран
6)закрыть крышку чайника
7)поставить чайник на место
8)включить чайник
9)взять кружку
10)поставить на стол
11)взять пакетик с заваркой
12)положить пакетик в кружку1
3)взять чайник,когда он выключится
14)налить кипяток в кружку
15)поставить чайник на место
16)взять сахар
17)взять ложку
18)насыпать сахар в чай
19)размешать чай
<span>ГОТОВО!</span>
const
n = 10;
x = 1;
y = 20;
var
arr: array[1..n] of integer;
tmp: integer;
begin
randomize;
write('Массив: ');
for var m := 1 to n do
begin
arr[m] := random(x, y);
write(arr[m], ' ');
end;
for var i := 1 to n do
begin
for var j := 1 to n - 1 do
begin
if (arr[j] < arr[j + 1]) then
begin
tmp := arr[j];
arr[j] := arr[j + 1];
arr[j + 1] := tmp;
end;
end;
end;
writeln();
write('После сортировки: ');
for var i := 1 to n do
write(arr[i], ' ');
end.