Блог учителя Информатики

Решение задачи ExamBegin9


Условие задачи:

На вход подается целое положительное число. Если оно является степенью числа 2, то вывести текст «YES», иначе вывести «NO».


uses PT4Exam;

var
  a, x: integer;
  num: boolean;

begin
  Task('ExamBegin9');
  ReadLn(a);
  x := 1; num := false;
  while x <= a do
  begin
    x := x * 2;
    if (x = a) or (a = 1) then num := true;
  end;
  if num = true then Write('YES')
  else Write('NO');
end.
Поделиться:
Вам также может понравится
Округление чисел в Python
Обмен значений двух переменных
Перевод чисел в Python
Снегопад из снежинок на Python с помощью Черепашки

Оставьте комментарий