Предмет: Информатика,
автор: Twillvik
Помогите составить программу на языке Паскаль! Дано натуральное число N. Выведите слово YES, если число N является точной степенью двойки, или слово NO в противном случае. Операцией возведения в степень пользоваться нельзя!
Ответы
Автор ответа:
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.
Похожие вопросы
Предмет: Химия,
автор: ayantelebaev
Предмет: Математика,
автор: Аноним
Предмет: Математика,
автор: sarvinozodilova00
Предмет: Алгебра,
автор: Аноним
Предмет: Физика,
автор: liliaarnaut96