Uses crt;

Var i,n,k,tong:integer;

      tb:real;

      a:array[1..1000] of integer;

      f1,f2:text;

Begin

clrscr;

Assign(f1,'SONGUYEN.inp');

Assign(f2,'SONGUYEN.out');

Reset(f1);Readln(f1,n);

For i:= 1 to n do read(f1,a[i]);

close(f1);

k:=0;tong:=0;

For i:= 1 to n do If (a[i]<0) and (Abs(a[i]) mod 2 = 1) then

  Begin

  inc(k);

  tong:=tong+a[i];

  End;

tb:=tong/n;

Rewrite(f2);

writeln(f2,tb:0:2);

Writeln(f2,k);

close(f2);

readln;

End.

Câu 2: 

const fi='xauhoa.inp'

fo='xauhoa.out'

var f1,f2:text;

st,s1:string;

d,i:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,st);

d:=length(st);

s1:=''

for i:=1 to d do 

  if st[i] in ['A'..'Z'] then s1:=s1+st[i];

writeln(f2,s1);

writeln(f2,length(s1));

close(f1);

close(f2);

end.

Tại sao người mua chữ năm cũ bây giờ lại không thấy?

Đây ạ :

Bài thơ thể hiện sâu sắc tình cảnh đáng thương của ông đồ đúng không?

- Nhưng mỗi năm mỗi vắng

Người thuê viết nay đâu?

27. unforgetable
câu 31 đổi thành ...if I can give him his guide....
câu 32 thiếu on trong turned on và đổi thành has been turned on vì câu gốc là HTHT
câu 33 rút gọn mệnh đề ok
câu 34 hơi phân vân nhưng mình thấy đúng

Câu 3: 

a: Áp dụng tính chất của dãy tỉ số bằng nhau, ta được:

\(\dfrac{x}{3}=\dfrac{y}{2}=\dfrac{x+y}{3+2}=\dfrac{90}{5}=18\)

Do đó: x=54; y=36

\(i=90^o-60^o=30^o\\ \\ i=i'\Leftrightarrow i'=30^o\)

a. -2x(x³ - 3x² - x + 1)

= -2x⁴ + 6x³ + 2x² - 2x

c. 3x²(2x³ - x + 5)

= 6x⁵ - 3x³ + 15x²

Bài 3: 

a: Ta có: \(6x\left(5x-3\right)+3x\left(1-10x\right)=7\)

\(\Leftrightarrow30x^2-18x+3x-30x^2=7\)

\(\Leftrightarrow x=-\dfrac{7}{15}\)

b: Ta có: \(3x\left(12x-4\right)-9x\left(4x-3\right)=30\)

\(\Leftrightarrow36x^2-12x-36x^2+27x=30\)

hay x=2

c: ta có: \(x\left(5-2x\right)-2x\cdot\left(x-1\right)=15\)

\(\Leftrightarrow5x-2x^2-2x^2+2x-15=0\)

\(\Leftrightarrow-4x^2+7x-15=0\)

\(\text{Δ}=7^2-4\cdot\left(-4\right)\cdot\left(-15\right)=-191\)

Vì Δ<0 nên phương trình vô nghiệm 

sorry bn