... người con được hưởng số tiền là 9 902 490 255 được chia theo tỉ lệ giữa người con
thứ nhất và người con thứ hai là 2 :3; giữa người con thứ hai và người con thứ ba là 4 : 5; giữa người con thứ ... AH.
I. Gọi BI là phân giác trong cùa
·
ABC
. Tính BI
1. Tính chất đường phân giác trong tam gác
BD DC
AB AC
BD AB BD AB
DC AC DC DB AC AB
=
⇔ = ⇒ =
+ +
2. Định nghĩa, tinh chất hình chữ nhật, ... của góc B cắt Ac tai D.
a) Tính độ dài của đoạn thẳng BD.
b) Tính tỉ số diện tích của các tam giác ABD và ABC.
c) Tính diện tíach tam giác ABD.
Giải:
Qua A kẻ đường thẳng song song với BD cắt...
... b
Bài 7: (2 điểm):
Biết rằng ngày 01/01/1992 là ngày Thứ T (Wednesday) trong tuần. Cho biết ngày
01/01/2055 là ngày thứ mấy trong tuần ? (Cho biết năm 2000 là năm nhuận).
Bài 8: (2 điểm):
Cho MA, ... cm và AC
= 7,62 cm.
a) HÃy tính độ dài của đờng cao BH, đờng trung tuyến BM và đoạn phân giác
trong BD của góc B ( M và D thuộc AC).
b) Tính gần đúng diện tích tam giác BHD.
Bài 10: (2 điểm):
Tìm...
... Trờng THPT Đề thi chọn học sinh giỏi khối 11 THPT
Gia Viễn B Môn: Toán.(Đề gồm 1 trang)
Năm học: 2006 2007.
... lớn nhất của biểu thức:
222222
225
1
225
1
225
1
acaccbcbbaba
P
++
+
++
+
++
=
.
Hết
đáp án đề thi chọn học sinh giỏi khối 11 THPT
2) Khi
0
30
=
, ta có diện tích hình chữ nhật ABCD là
2
1
cossin
22
=
aS
. ... = xảy ra
cba
==
.
2
111
3
1111
++++
cbacabcab
. Dấu = xảy ra
cba
==
.
Kết hợp với giả thi t ta có đợc:
2007
111
3
10111
3
15
22
+
++
++
cbacba
hay
5
6021111
++
cba
.
Dấu...
... mảng A[] để lu các số trong tệp 1
+ Dùng mảng B[] để lu các số trong tệp 2
+ Lấy từng phần tử X
i
trong A[], so sánh với lần lợt từng phần tử Y
j
trong B[]. Nếu X
i
có trong B[] thì đem X
i
... lớn trong một khoảng thời gian rất nhỏ, ta sử
dụng kỹ thuật đánh dấu phần tử.
Ta cần chú ý đến một giả thi t quan trọng trong bài toán đặt ra là các phần tử đôi
một khác nhau, nghĩa là trong ... xếp tăng dần.
Chơng trình mẫu:
const fi='sap1.inp';
fo='sap2.out';
type mmcb=array[1 32766] of boolean;
var f:text;
n:word;
b:mmcb;
ti:longint;
procedure doc;
var i,x:word;
begin
CTT...
... nhất từ xp tới đ
Uses Crt;
Const Max = 100;
Fi = 'Duongdi.inp';
Type Ta = Array[1 Max,1 Max] of Record h : Word;tg : Byte; End;
Dau = Array[1 Max] of Boolean;
Var N,xp,t : Integer;
... Crt;
Const Max = 100;
Fi = 'duongdi.inp';
Type Ta = Array[1 Max,1 Max] of Integer;
Re = Record
t : Byte;
h : Word;
End;
Nhan = Array[0 Max] of Re;
Dau = Array[1 Max] of Boolean;
Var ... . Sau đây là 2 thuật toán giúp tránh tình
trạng đó trong nhiều đồ thị.
I / Thuật toán Di jsktra ( gán nhÃn ) :
T tởng của thuật toán là trong quá trình xây dựng đờng đi từ xp tới đ ,luôn kết...
... Crt;
Const Max = 100;
Fi = 'duongdi.inp';
Type Ta = Array[1 Max,1 Max] of Integer;
Re = Record
t : Byte;
h : Word;
End;
Nhan = Array[0 Max] of Re;
Dau = Array[1 Max] of Boolean;
Var ... nhất từ xp tới đ
Uses Crt;
Const Max = 100;
Fi = 'Duongdi.inp';
Type Ta = Array[1 Max,1 Max] of Record h : Word;tg : Byte; End;
Dau = Array[1 Max] of Boolean;
Var N,xp,t : Integer;
... tới j là D[i,j] rõ ràng là đại
lợng nhỏ nhất trong các tổng : D[i,k] + D[k,j] trong đó k là mọi đỉnh trung gian ( con
đờng đi từ i tới j sẽ đi qua k ).
Procedure DgdiFB;
Var i,j,k : Integer;
Begin
_______________________
Phần...
... End;
Function CoNoi : Boolean;
Var j : Byte;
Begin
For j:=1 to h do
If G[x,A[j]]=1 then
Begin
CoNoi := True;
Exit;
End;
CoNoi := False;
End;
Begin
For x:=1 to N do
If Khongthuoc then
... Inc(A[T[i].x+Di[k],T[i].y+Dj[k]]);
End;
Function Boduoc(i : Byte) : Boolean;
Var k,u,v : Byte;
Begin
Boduoc := True;
If A[T[i].x,T[i].y]<=1 then
Begin
Boduoc := False;
Exit;
End;
For k:=1 ... ',k, ' phan tu .');
{Tong := Tong +Dem;}
Break;{ CHI TIM TAP NHAN IT PHAN TU NHAT }
End;
End;
{ Writeln(F2,'Tong cong co ',Tong,' Tap Nhan . ');}
End;
30
...
... Xây dựng hàm Fibonaci bằng đệ quy và không đệ quy
Function Fibonaci(N : Integer) : Integer;
Begin
If N=0 then Fibonaci =1 {N=0 hoặc N=1 là điều kiện B
0
}
Else
If N=1 then Fibonaci =1
Else ... }
Else
If N=1 then Fibonaci =1
Else {N>=2 là điều kiÖn B
k
}
Fibonaci := Fibonaci(N-1)+ Fibonaci(N-2)
End;
Function Fibonaci(N : Integer) : Integer;
Var i,p,U0,U1 : Integer;
Begin
i := 0;
U0 ... chứa 3 ký tự này có tính chất :
Không có 2 xâu con liền nhau bằng nhau .
Kiểu đệ quy
Uses Crt;
Const N = 20;
Var S : String;
Function Kt(S : String) : Boolean;
Var i,j : Byte;
Begin
Kt := True;
...
... 5)= 7
Tong gia tri cay khung ngan nhat la 37
Uses Crt;
Const Fi = 'prim.txt';
Fo = 'prim.out';
Max = 200;
Var A : Array[1 Max,1 Max] of Byte;
D : Array[1 Max] of Boolean;
... không thuộc Đ , ta gán cho nó nhÃn k(i ,d
) trong đó i
là tên đỉnh thuộc Đ ,kề với k , gần k nhất , còn d là khoảng cách giữa i
và k . Nếu trong
Đ không tìm đợc đỉnh i
kề với k thì gán ... Tàiliệu 11 Chuyên Tin Hà Tây
Writeln(f,'Tong gia tri cay khung ngan nhat la ',p);
Close(f);
End;
{ }
Procedure TT_Prim;
Var Ok : Boolean;
Begin
SoCanh := 0;
Fillchar(nh,sizeof(nh),0);
...
... nhất từ xp tới đ
Uses Crt;
Const Max = 100;
Fi = 'Duongdi.inp';
Type Ta = Array[1 Max,1 Max] of Record h : Word;tg : Byte; End;
Dau = Array[1 Max] of Boolean;
Var N,xp,t : Integer;
... Crt;
Const Max = 100;
Fi = 'duongdi.inp';
Type Ta = Array[1 Max,1 Max] of Integer;
Re = Record
t : Byte;
h : Word;
End;
Nhan = Array[0 Max] of Re;
Dau = Array[1 Max] of Boolean;
Var ... . Sau đây là 2 thuật toán giúp tránh tình
trạng đó trong nhiều đồ thị.
I / Thuật toán Di jsktra ( gán nhÃn ) :
T tởng của thuật toán là trong quá trình xây dựng đờng đi từ xp tới đ ,luôn kết...
... {Tong := Tong +Dem;}
Break;
End;
End;
{ Writeln(F2,'Tong cong co ',Tong,' Tap on dinh ngoai . ');}
End;
Procedure Vet_Nhan(i : Byte);
Var j : Byte;
Function KT_Trong ... ',Tong,' Tap on dinh trong . ');}
End;
Procedure Tao_Ngoai(i : Byte);
Var j : Byte;
Function KT_Ngoai (A : Mang1;h : Byte): Boolean;
Var x,y : Byte;
Function Khongthuoc : Boolean;
... Begin
Khongthuoc := False;
Exit;
End;
Khongthuoc := True;
End;
Function CoNoi : Boolean;
Var j : Byte;
Begin
For j:=1 to h do
If G[x,A[j]]=1 then
Begin
CoNoi := True;
Exit;
End;
CoNoi...