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.
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.
By Lyla
By Lyla
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.
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;
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.