Viết bằng pascal dc k

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.

A

A

A. A = {9}, A có 1 phần tử.

a) \(\dfrac{1}{a}-\dfrac{1}{b}=\dfrac{1}{a-b}\left(đk:a,b\ne0,a\ne b\right)\Leftrightarrow\dfrac{b-a}{ab}=\dfrac{1}{a-b}\)

\(\Leftrightarrow-\left(a-b\right)^2=ab\Leftrightarrow a^2-ab+b^2=0\)

\(\Leftrightarrow\left(a^2-ab+\dfrac{1}{4}b^2\right)+\dfrac{3}{4}b^2=0\Leftrightarrow\left(a-\dfrac{1}{2}b\right)^2+\dfrac{3}{4}b^2=0\)

Dấu "=" xảy ra \(\Leftrightarrow\left\{{}\begin{matrix}a-\dfrac{1}{2}b=0\\\dfrac{3}{4}b^2=0\end{matrix}\right.\) \(\Leftrightarrow\left\{{}\begin{matrix}a=\dfrac{1}{2}b\\b=0\end{matrix}\right.\) \(\Leftrightarrow a=b=0\left(ktm\right)\)

Vậy k có a,b thõa mãn 

b) \(\dfrac{5}{2a}=\dfrac{1}{6}+\dfrac{b}{3}\left(a\ne0\right)\Leftrightarrow\dfrac{2b+1}{6}-\dfrac{5}{2a}=0\Leftrightarrow\dfrac{a\left(2b+1\right)-15}{6a}=0\)

\(\Leftrightarrow a\left(2b+1\right)-15=0\Leftrightarrow a\left(2b+1\right)=15\)

Do \(a,b\in Z,a\ne0\) nên ta có bảng sau:

Vậy...

Đáp án D

Gen có 1500 cặp Nu → tổng số Nu của gen là: 1500.2 = 3000 Nu

Số Nu mỗi loại của gen ban đầu là: A = T = 30%.3000 = 900 Nu

G = X = 20%.3000 = 600 Nu

Xét mạch 1: T1 = 300 → A1 = 900 - T1 = 600 Nu

X1 = 30%.1500 = 450; G1 = 600 - 450 = 150 Nu

Theo nguyên tắc bổ sung ta có: A2 = T1 = 300; T2 = A1 = 600; G2 = X1 = 450; X2 = G1 = 150

Xét các phát biểu của đề bài:

+ I Đúng. Tỉ lệ A1/G1 = 600/150 = 4

+ II Đúng. Mạch 1 của gen có (T1+X1)/(A1+G1) = (300 + 450)/(600 + 150) = 1

+ III Đúng. Mạch 2 của gen có A2/X2 = 300/150 = 2

+ IV Sai. Mạch 2 của gen có (A2+X2)/(T2+G2) = (300 + 150)/(600 + 450) khác 1

CT=6,5cm

Xét tam giác DCE vuông tại C có:

          \(DE^2=DC^2+EC^2\) (định lý Pytago).

Thay: \(DE^2=12^2+5^2\Rightarrow DE=\sqrt{169}=13\left(DE>0\right).\)

Xét tam giác DCE vuông tại C có: CT là trung tuyến (T là trung điểm DE).

\(\Rightarrow CT=\dfrac{1}{2}DE\) (Tính chất đường phân giác trong tam giác vuông).

\(\Rightarrow CT=\dfrac{1}{2}13=6,5\left(cm\right).\)

a, ta thấy số số hạng của A là 100 vậy nếu ghép đôi thì sẽ có 50 cặp

A=(1-2)+(3-4)+.....+(99-100)

A=(-1).50=-50

b,A chia hết cho 2,5 nhưng ko chia hết cho 3

c,A có 6 ước tự nhên và 12 ước nguyên

xin lỗi em mới học lớp 5 nếu em ma hoc lớp 6 chắc chắn em sẽ giải bài này