Вводится число. Напечатать YES, если оно является степенью двойки, NO - иначе.

Ввод 1 8

Вывод 1 YES

Ввод 2 22

Вывод 2 NO

Question

Информатика

Ванютя

30 ноября, 11:15

Вводится число. Напечатать YES, если оно является степенью двойки, NO - иначе.

Ввод 1 8

Вывод 1 YES

Ввод 2 22

Вывод 2 NO

+4

Ответы (1)

Знаете ответ на вопрос?

Сана · Answer 1

Program x2;

var n:longint;

begin

Write ('Введите n, n = ') ;

Readln (n) ;

While n mod 2 = 0 do

n: = n div 2;

If n=1 then Write ('YES')

else write ('NO') ;

end.

Вводится число. Напечатать YES, если оно является степенью двойки, NO - иначе.Ввод 1 8Вывод 1 YESВвод 2 22Вывод 2 NO

Вводится число. Напечатать YES, если оно является степенью двойки, NO - иначе.

Ввод 1 8

Вывод 1 YES

Ввод 2 22

Вывод 2 NO