kristeisha871
?>

Зробіть висновок щодо доцільності використання кожного з режимів кадрування в графічному редактор

Информатика

Ответы

info2

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

tteplovoz3789

Представьте себе, что нам нужно много раз решать одну и ту

же вычислительную задачу при различных исходных данных.

Конечно, хочется один раз «научить» компьютер выполнять все

нужные действия, а потом подставлять новые исходные данные

и сразу получать результат. Для этого придумали электронные

таблицы (табличные процессоры). Так называются программы,

которые хранят все данные в виде таблиц. Но это не просто

таблицы: в ячейках могут храниться формулы, вычисления по

которым выполняются автоматически при любом изменении дан-

ных.

Объяснение:

Вот так?

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Зробіть висновок щодо доцільності використання кожного з режимів кадрування в графічному редактор
Ваше имя (никнейм)*
Email*
Комментарий*