Ответы
Ответ дал:
0
var
n, i: integer;
ar: array[1..10000]of integer;
begin
read(n);
for i := n downto 1 do
begin
ar[i] := i;
write(ar[i], ' ');
end;
end.
n, i: integer;
ar: array[1..10000]of integer;
begin
read(n);
for i := n downto 1 do
begin
ar[i] := i;
write(ar[i], ' ');
end;
end.
Вас заинтересует
2 года назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад