Помогите пожалуйста решить задачку.С клавиатуры вводится число. Узнать является ли число

Помогите пожалуйста решить задачку.

С клавиатуры вводится число. Выяснить является ли число четным. Если число четное указать, является ли оно степенью двойки.

Задать свой вопрос
1 ответ

// PascalABC.NET 3.4, сборка 1766 от 25.08.2018

// Внимание! Если программка не работает, обновите версию!


begin

var s:=ReadlnString('Введите естественное число:');

var b:BigInteger;

if not BigInteger.TryParse(s,b) then

begin

Print('Это не натурвльное число');

Exit

end;

var r:=b.IsEven and b.IsPowerOfTwo;

if r then Println('Это степеь двойки')

else Println('Это не ступень двойки')

end.

Иван Цыгвинцев
Парное - это на Украине. В российском языке - "четное".
Крепкер Дарина
Но вопрос-то по-русски задан был))) А украинский здесь далеко не все разумеют.
Ruslan Smogalla
По-превосходному, эта проверка на четность - тупость. Есть только одно нечетное число, которое является нулевой степенью двойки - единица.
Мария Сечейко
Ранее желая бы в Mozilla можно было нормально тексты программ копировать, сейчас и это поломали. Что тут скажешь...? Желая, все и так теснее давно сказано. И не раз.
Danil Migalega
Удивительно, что примерно года два теснее идет последовательная ломка хоть как-то работавшего интерфейса под видом приспособления под смартфоны. А в обычных браузерах все хуже и ужаснее работать. Погоня за массовостью. Когда-нибудь дойдет до этих странноватых людей, что в Информатике решения с телефонов практически никто не дает?
Васька Цомиров
Ну сломают все окончательно быстро и те, кто дает решения уйдут нафик - терпение не постоянно же - глядеть, как здесь надобно тобой эти сайтописатели изгаляются. А вослед за ними уйдут и те, кто эти вопросы задает. И не будет здесь раздела информатики... этого хотят добиться?
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт