Đề ghi thứ tự đỉnh tam giác sai nên mới sửa lại đó em

Bài 5:

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

i,n,max:integer;

sc, sl:longint;

Begin

Write('n = ');readln(n);

For i:=1 to n do

Begin

Write('Nhap so thu ',i,' = ');rreadlna[i]);

If a[i] mod 2 = 0 then sc:=sc+b[i];

If a[i] mod 2 <> 0 then sl:=sl+a[i];

End;

max:=a[1];

For i:=2 to n do

If a[i] > max then max:=a[i];

Writeln('Tong cac so chan la ',sc);

Writeln('Tong cac so le la ',sl);

write('So lon nhat la ',max);

Readln

End.

Hình đó thiếu tùm lum, thêm vẽ sai nữa đó em!

A = 1/(5.6) + 1/(6.7) + ... + 1/(24.25)

= 1/5 - 1/6 + 1/6 - 1/7 + ... + 1/24 - 1/25

= 1/5 - 1/25

= 4/25

B = 2/(1.3) + 2/(3.5) + 2/(5.7) + ... + 2/(99.101)

= 1 - 1/3 + 1/3 - 1/5 + 1/5 - 1/7 + ... + 1/99 - 1/101

= 1 - 1/101

= 100/101

Ta có:

n + 3 = n - 2 + 5

Để A ∈ Z thì n - 2 ∈ Ư(5) = {-5; -1; 1; 5}

⇒ n ∈ {-3; 1; 3; 7}

Diện tích hình thoi:

50 × 60 : 2 = 1500 (dm²)

1500 dm² = 15 m²

x² - 3x = 0

⇔ x(x - 3) = 0

⇔ x = 0 hoặc x - 3 = 0

*) x - 3 = 0

⇔ x = 3

Vậy S = {0; 3}

Bổ sung đề:

(2x - 1)(x² - x + 1) = 0

⇔ 2x - 1 = 0 hoặc x² - x + 1 = 0

*) 2x - 1 = 0

⇔ 2x = 1

⇔ x = 1/2

*) x² - x + 1 = 0

Ta có:

x² - x + 1 = x² + 2.x.1/2 + 1/4 + 3/4

= (x - 1/2)² + 3/4 > 0 với mọi x ∈ R

⇒ x² - x + 1 = 0 là vô lý

Vậy S = {1/2}

Do E là trung điểm của AB

⇒ AE = AB : 2 = 10 : 2 = 5 (cm)