1) var mas:array[1..10] of Integer;
i:integer;
begin
i := mas[1];
mas[1] := mas[6];
mas[6] := i;
<span>end.
Вот как то так
</span>
<span>Почему вы не хотите воспользоваться онлайн шифровщиком ?
Вот и ответ : рцяешцст</span>
2 в двоичной записи единица и ноль
2^N это единица и N нулей.
(2^N - 1) это N единиц
((2^N - 1) - 2) = (2^N - 3) это N-2 единицы, ноль и единица (N>=2 иначе всё плохо)
8 - единица и 3 нуля
8^N - единица и 3*N нулей
Последний шаг делайте сами.
<span>Ответ: 1+ (1024 - 1) = 1024</span>
Линейка нужна для изменения расстояния (между точками) с незначительной погрешностью.
Транспортир нужен для измерения градусной меры угла с незначительной погрешностью.
Термометр нужен для измерения температуры.
Барометр нужен для измерения атмосферного давления.
Компас нужен для ориентирования по магнитным полюсам Земли.
Телескоп нужен для того, чтобы увидеть отдалённые объекты.
Микроскоп нужен для того, чтобы увидеть незримые невооружённым глазом тела.
Программа реализована в Microsoft Word