< >

Помогите составить программу на языке Паскаль! Дано натуральное число N. Выведите слово YES, если число N является точной степенью двойки, или слово NO в противном случае. Операцией возведения в степень пользоваться нельзя!

Ответы

Ответ дал: Kitsu
0
var n,p:int; begin  readln(n);  p:=1;  while p<n do p:=p*2;  if p=n then write('YES') else write('NO');  readln; end.
Похожие вопросы
Русский язык
2 года назад
сказуемое это рельсы по которым движется мысль
Русский язык
2 года назад
пословица со словом порт
Алгебра
7 лет назад
Моторная лодка прошла против течения 96 км и вернулась обратно, затратив на обратный путь на 4 часа меньше. Найдите скорость лодки по течению, если скорость течения 2 км/ч ?
География
7 лет назад
Опишите любой конфликт между двумя странами
Химия
10 лет назад
Метан CH4 объемом 44.8 (н.у.) имеет массе г а) 8 б)16 в)32 г)48
Физика
10 лет назад
1) установить соответствие между словами и понятиями: кубик,льда,массой,пять,граммов,растаял     физическое тело;вещество;физическая величина;еденица физической величины;физическое
Математика
10 лет назад
Чтобы узнать расстояние от дома до реки, Костя, выйдя из дома, начал считать шаги, и у реки он насчитал 1386 шагов, а на обратном пути -1400 шагов. 1) Узнай, сколько в среднем шагов сделал Костя от
Математика
10 лет назад
для ремонта квартиры завезли 7 пакетов песка, 14 пакетов победки и цемент. цемента было на 5 пакетов меньше, чем побелки.сколько пакетов цемента и песка закупили для ремонта?