Ai biết chỉ mình với. Mai mình đi học rồi.
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
![](https://rs.olm.vn/images/avt/0.png?1311)
![](https://rs.olm.vn/images/avt/0.png?1311)
bn phải hk thuộc các nộ dung chính của các bài thì sẽ có thể làm được bài
![](https://rs.olm.vn/images/avt/0.png?1311)
Bài 2:
Giải:
Áp dụng tính chất dãy tỉ số bằng nhau ta có:
\(\frac{a_1}{a_2}=\frac{a_2}{a_3}=...=\frac{a_{2016}}{a_{2017}}=\frac{a_1+a_2+...+a_{0216}}{a_2+a_3+...+a_{2017}}\)
\(\Rightarrow\frac{a_1}{a_2}.\frac{a_2}{a_3}...\frac{a_{2016}}{a_{2017}}=\left(\frac{a_1+a_2+...+a_{2016}}{a_2+a_3+...+a_{2017}}\right)^{2017}\)
\(\Rightarrow\frac{a_1}{a_{2017}}=\left(\frac{a_1+a_2+...+a_{2016}}{a_2+a_3+...+a_{2017}}\right)^{2017}\)
![](https://rs.olm.vn/images/avt/0.png?1311)
program TICHSO;
var
n, i, j, maxVal, a_i, a_j: Integer;
begin
maxVal := 0;
Readln(n);
for i := 1 to n do
begin
Read(a_i);
if Abs(a_i) > maxVal then
maxVal := Abs(a_i);
end;
for i := 1 to n-1 do
begin
for j := i+1 to n do
begin
a_i := Abs(a[i]);
a_j := Abs(a[j]);
if (a_i * a_j) > maxVal then
maxVal := a_i * a_j;
end;
end;
Writeln(maxVal);
end.
![](https://rs.olm.vn/images/avt/0.png?1311)
1: 60=2^2*3*5
280=2^3*5*7
=>BCNN(60;280)=2^3*5*7*3=840
2: 84=2^2*3*7
108=2^2*3^3
=>BCNN(84;108)=2^2*3^3*7=756
3: 13=13
15=3*5
=>BCNN(13;15)=13*3*5=195
4: 10=2*5
12=2^2*3
15=3*5
=>BCNN(10;12;15)=2^2*3*5=60
5: 8=2^3; 9=3^2; 11=11
=>BCNN(8;9;11)=2^3*3^2*11=72*11=792
6: 24=2^3*3
40=2^3*5
168=2^3*3*7
=>BCNN(24;40;168)=2^3*3*5*7=840
7: 30=2*3*5
105=3*5*7
=>BCNN(30;105)=2*3*5*7=210
8: 40=2^3*5
28=2^2*7
140=2^2*5*7
=>BCNN(40;28;140)=2^3*5*7=240
10: 16=2^4
25=5^2
=>BCNN(16;25)=2^4*5^2=400
a, Trường hợp 2 đth vuông góc : (2)
Trường hợp 2 đth song song: (1),(3)