В 1 гб. - 1000 мб.
В 1 мб.- 1000 кб.
В 1 б. - 1 бт.
Дана последовательность, состоящая из 10 чисел [7, 3, 10, 9, 8, 4, 1, 6, 2, 5]. Вы умеете за один ход поменять в ней местами два
Waln
Const
a: array of integer = (7, 3, 10, 9, 8, 4, 1, 6, 2, 5);
begin
var n := 0;
var found := false;
repeat
found := false;
for var i := low(a) to High(a) - 1 do
if a[i] > a[i + 1] then begin
swap(a[i], a[i + 1]);
found := true;
n := n + 1;
end;
until not found;
writeln('Swaps = ', n);
end.
Ответ
Swaps = 30
Интернет игры документы данные
#include <stdio.h>
int main()
{
int x,i,n,k=0,ch[100]={0};
printf("n=");
scanf("%d",&n);
printf("%d\n",0);
for(i=1;i<=n;i++)
{
x=i;
while(x!=0)
{
ch[k]=x%3;
x=x/3;
k++;
}
for(x=k-1;x>=0;x--)
{
printf("%d",ch[x]);
ch[x]=0;
}
printf("\n");
k=0;
}
return 0;
}