Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
anh đẹp zai
Xem chi tiết
Trần Đức Huy
29 tháng 1 2022 lúc 9:51

Viết bằng pascal dc k

 

Trần Đức Huy
29 tháng 1 2022 lúc 11:58

Var k,i,t:longint;
Function kt(n:longint):boolean;
Var s,x:string;
    d,m,j:longint;
Begin
s:=''
x:=''
j:=0;
d:=0;
 While n<>0 do
  Begin
   d:=n mod 2;
   n:=n div 2;
   Str(d,s);
   x:=x+s;
   j:=length(x)
  end;
s:=x;
For m:=1 to j do
 x[m]:=x[j-m+1];
If s=x then Exit(True) else Exit(False);
end;
Begin
{$ifndef online_JUDGE}
Assign(input,'standard.inp');
 Reset(input);
Assign(output,'standard.out');
 Rewrite(output);
{$endif}
Read(k);
For i:=1 to k+1 do
 Begin
  If kt(i-1) then inc(t);
 end;
Write(t);
end.

 

Mozono Nanami
Xem chi tiết
Dương Thị Huyền
Xem chi tiết
Bùi Hoàng Linh Chi
Xem chi tiết
Nguyễn Minh Khang
Xem chi tiết
Nguyễn Lê Phước Thịnh
16 tháng 12 2021 lúc 20:39

Câu 1: Không

Vì 1112>11110

Ídnkcds
Xem chi tiết
Kiều Vũ Linh
13 tháng 1 2022 lúc 11:24

2A = 2.16 + 10.1 = 32 + 10 = 42

Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
4 tháng 7 2018 lúc 17:58

Đáp án C

NSA tươi
Xem chi tiết
27.Nguyễn Ngọc Phúc
4 tháng 1 2022 lúc 21:34

Hình như cái này là lớp 10 mà sao lại đưa vô mục lớp 8

Nguyễn Lê Phước Thịnh
5 tháng 1 2022 lúc 11:41

Chọn A

Mây Nè
Xem chi tiết