Viết chương trình cho phép nhập số nguyên dương N rồi thực hiện: Cho biết N có phải là một lũy thừa của 2 không.

0 bình luận về “Viết chương trình cho phép nhập số nguyên dương N rồi thực hiện: Cho biết N có phải là một lũy thừa của 2 không.”

1. program luythua;

   uses crt;

   var: i,n:integer;

         P:longint; 

   begin

   clrscr;

   Write(‘ n = ‘); Readln(n);

   P:=1;

    Repeat

   P:=P*2;

   Until P >=N;

   Bình luận

2. uses crt;
   var n,lt:longint;
   begin
   clrscr;
      readln(n);
      lt:=1;
      while lt<n do lt:=lt*2;
      if lt=n then write(‘true’) else write(‘false’);
   readln
   end.

   Bình luận