Напишите программу, которая вводит натуральное число N и выводит на экран чётные положительные степени числа 2, не большие, чем 2 N , в порядке убывания. Входные данные Входная строка содержит одно натуральное число N . Выходные данные Программа должна вывести в одну строчку через пробел чётные положительные степени числа 2, не большие, чем 2 N , в порядке убывания. Если таких нет, программа должна вывести число 0. Напишите программу, использую только while, без repeat и until Максимальное количество

ответ:Вариант №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

ответ: 432 см²

Объяснение:

Обозначим трапецию АВСD; BC||AD.  BC=b=11 см, AD=a=25 см

Опустим из вершины В высоту ВН.

Высота равнобедренной трапеции, опущенная из вершины тупого угла, делит основание на отрезки, меньший из которых равен полуразности оснований, больший - их полусумме. ⇒

АН=(25-11):2=7 см

DH=(25+11):2=18 см

ВС||AD, диагональ трапеции ВD- секущая. ⇒ ∠СВD=∠BDA (по свойству накрестлежащих углов)..  

ВD - биссектриса угла В, поэтому и ∠АВD=∠BDA. Углы ∆ АВD при основании BD равны, ⇒ ∆ АВD равнобедренный, АВ=АD=25 см.  

Из ∆ АВН по т.Пифагора ВН=24 ( стороны ∆ АВН из Пифагоровых троек).

Площадь трапеции равна произведению полусуммы оснований на высоту. Полусумма оснований DH=18 см

Ѕ(ABCD)=HD•BH=18•24=432 см²

Объяснение:

Логические знаки не дает вставлять - пишу их союзами и частицами подчеркнутыми.
1)   Число  376 четное и трехзначное.
А = "Число  376 четное"
В = "Число  376 трехзначное"
А и В 
2) Неверно, что Солнце движется вокруг Земли.
А = "Солнце движется вокруг Земли"
Не А
3) Земля имеет форму шара.
А = "Земля имеет форму шара"
А
4) На уроке математики старшеклассники отвечали на вопросы учителя и писали самостоятельную работу.
А = "На уроке математики старшеклассники отвечали на вопросы учителя"
В = "На уроке математики старшеклассники писали самостоятельную работу"
А и В
5) Если сумма цифр числа делится на 3, то число делится  на  3.
А = "Сумма цифр числа делится на 3"
В = "Число делится  на  3"
А стрелка к  В
6) Число  делится на 3 тогда и только тогда, когда сумма цифр числа  делится на 3
А = "Число  делится на 3 "
В = "Сумма цифр числа  делится на 3"
А стрелка в обе стороны В