1сыр
2ответ
3сорока
4тетрадь
5арбуз
6ворона
const
n = 10;
var
a:array[1..n] of integer;
i, j:integer;
begin
randomize;
writeln('Исходный массив:');
for i := 1 to n do
begin
a[i] := random(101);
write(a[i], ' ');
end;
for i := 1 to n - 1 do
for j := 1 to n - i do
if a[j] mod 10 > a[j + 1] mod 10 then
begin
a[j] := a[j] + a[j + 1];
a[j + 1] := a[j] - a[j + 1];
a[j] := a[j] - a[j + 1];
end;
writeln;
writeln('Результат:');
for i := 1 to n do
write(a[i], ' ');
writeln;
end.
N=2^i
Находим i:
64=2^i => i = 6 бит
I=6*10*32*64=60*2^5*2^6=60*2^11 бит = 2^13*15бит=15Кбайт
Freeware<span> – это те программные продукты и утилиты, которые в основном распространяются и используются без всяких ограничений</span>