Для движения робота вперед с использованием двух моторов нужно…
задать положительную мощность мотора на блоке «Рулевое управление»
задать отрицательную мощность мотора на блоке «Рулевое управление»
задать положительную мощность мотора на блоке «Большой мотор»
задать отрицательную мощность мотора на блоке «Большой мотор»
ну смотри,
1. На вкладке Файл нажмите Печать.
2. Для предварительного просмотра каждой страницы используйте стрелки в нижней части окна предварительного просмотра. Если текст отображается слишком мелко, увеличьте масштаб с ползунка в нижней части страницы.
3. Выберите количество копий и любые другие нужные параметры, а затем нажмите кнопку Печать.
Чтобы напечатать только определенные страницы, свойства документа или исправления и комментарии, в разделе Настройка щелкните стрелку в правой части кнопки Напечатать все страницы (по умолчанию), чтобы увидеть все варианты.
Чтобы напечатать только определенные страницы, выполните одно из указанных ниже действий.
Чтобы напечатать страницу, отображаемую в режиме предварительного просмотра, выберите Текущая страница.
Чтобы напечатать последовательные страницы, например 1–3, выберите вариант Настраиваемая печать и введите номера первой и последней страниц в поле Страницы.
Чтобы напечатать отдельные страницы и диапазон одновременно (например, страницу 3 и страницы 4–6), выберите Настраиваемая печать и введите через запятую номера и диапазоны (например, 3, 4-6).
ответ:Вариант №1 (не совсем удачный, как было отмечено в комментариях).
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
var n,i,m:integer;
flag:boolean;
begin
readln(n);
flag:=false;
if (n mod 2<>0)then i:=n-1 else i:=n;
while i>0 do begin
if power(2,i)<=n then begin
write(power(2,i),' '); flag:=true;
end;
i:=i-2;
end;
if not flag then writeln(0);
end.
Тест №1
1025
1024 256 64 16 4
Тест №2
1
0
Вариант №2
var a,i,n: integer;
begin
a:=1;readln(n);
i:=trunc(log2(n)); //получим степень двойки для n
//если i нечетное,
//то первое искомое число получаем путем сдвига влево на i-1 в
//двоичном представлении числа иначе сдвиг на i
if (i mod 2)=1 then a:=a shl(i-1) else a:=a shl i;
//далее получаем числа сдвигая вправо на 2 разряда
//в двоичном представлении числа
while a>=2 do begin
write(a,' ');
a:=a shr 2;
end;
end.
Тестовое решение:
2147483647
1073741824 268435456 67108864 16777216 4194304 1048576 262144 65536 16384 4096 1024 256 64 16 4