For i:=0 to 10 do

A[i]:=i*2;

for i: = 10 downto 0 do

begin

k:=A[10-i];

A[10-i]:=A[i];

A[i]:=k;

end.

Question

Информатика

Агапия

21 октября, 07:10

For i:=0 to 10 do

A[i]:=i*2;

for i: = 10 downto 0 do

begin

k:=A[10-i];

A[10-i]:=A[i];

A[i]:=k;

end.

+5

Ответы (1)

Знаете ответ?

Акилина · Answer 1

1)

полученные числа:

0 1 2 3 4 5 4 3 2 1 0

2)

10

3)

10 9 8 7 6 5 4 3 2 1 0

4)

10 9 8 7 6 5 6 7 8 9 10

5)

полученные числа:

1 0 3 2 5 4 7 6 9 8 10

For i:=0 to 10 doA[i]:=i*2;for i: = 10 downto 0 dobegink:=A[10-i];A[10-i]:=A[i];A[i]:=k;end.

For i:=0 to 10 do

A[i]:=i*2;

for i: = 10 downto 0 do

begin

k:=A[10-i];

A[10-i]:=A[i];

A[i]:=k;

end.