... doc_hoso; begin write('Tap tap tin: '); readln(st); assign(f,st); 4/5 Hội ThiTinHọc Trẻ Huyện Dĩ An 20 09 (*$I-*) reset(f); if IOResult0 then begin writeln('Khong co tap tin ',st); halt(0); end; ... ten:string[10]; end; var 3/5 Hội ThiTinHọc Trẻ Huyện Dĩ An 20 09 f: file of hs; a:hs; nhap:char; chon:byte; st:string; procedure nhap_hoso; begin write(' Ten tap tin: '); readln(st); assign(f,st); ... readln; end Bài 3: Viết chương trình a) Nhập danh sách lớp: (2 đ) Thông tinhọc sinh gồm: họ, tên Lưu vào tập tin HOSO.txt b) Đọc thông tinhọc sinh từ tập tin HOSO.txt xuất hình (2 đ) program hoso;...
... chiều ngang ấn phím dừng (nhập xuất chuỗi: đ) (chạy chữ: đ) ( ấn phím dừng: đ) Ví dụ: Ho va Ten: Tran Bang Tam Tran Bang Tam Program Bai3; uses crt; var str: string; i: integer; dung:boolean; begin ... tri cho day so nguyen:'); for i:=1 to n 2/4 Hội ThiTinHọc Trẻ Huyện Dĩ An 20 09 begin write('z[',i,']= '); readln(z[i]); end; writeln('Cac phan tu khong chia he cho 3'); for i:=1 to n if (z[i] ... readln(str); textcolor(14); dung:=false; while true for i:=1 to 80 3/4 Hội ThiTinHọc Trẻ Huyện Dĩ An 20 09 begin gotoxy(i,10); write(str); delay(1000); clrscr; dung:=keypressed; if dung then exit; end;...
... phan tu thuoc cot le = ’,tong1 / spt1 :10:2); For i:= to For j := to If ( i mod = ) and ( j mod = ) then Begin Tong2 := tong2 + A[i,j]; Spt2 := spt2 + End; Writeln (‘ Trung binh cong cac phan ... , tong1, tong2, spt1,spt2 : Integer; Begin Clrscr; For i:= to For j := to Begin Write (‘ Nhap phan tu dong ‘,i,’ cot ‘,j,’ : ‘); Readln(A[i,j]); End; Tong1:= ; Tong2 := 0; spt1:= ; spt2 := 0; ... Tong2 := tong2 + A[i,j]; Spt2 := spt2 + End; Writeln (‘ Trung binh cong cac phan tu thuoc dong chan, cot le = ’,tong2 / spt2 :10:2); Readln End Điểm 1 Nếu Hs khai báo sai biến mảng : Trừ ½ số điểm...
... sc:=sc + 1; writeln(‘so luong so chan=’,sc); writeln(‘so luong so le=’, 10 - sc); t:=0; For i:=1 to 10 t:= t + A[i]; writeln(‘ gia tri trung binh cua cac phan tu mang=’, t/10:10:4); readln end ... baitap; Var A: array[1 10] of integer; i, max, csmax, sc, t: integer; Begin Write(‘ nhap cac phan tu cua day :’); For i:=1 to 10 Begin Khai báo Nhập mảng Câu a (Max) Câu b (sc, sl) Câu c (gtrị...
... writeln('Tong cac phan tu day so :',S); writeln('So cac phan tu chan day so nguyen:', d1, 'Tong cac phan tu chan day la: ',S1); writeln('So cac phan tu le day so nguyen:', d2, 'Tong cac phan tu le day ... Setcolor(red); {Thiet lap ve hinh tron rong voi mau vien mau do} Circle(a,b,r); Delay(100); Setcolor(black); {Thiet lap ve hinh tron rong voi mau vien mau den cung voi mau nen cua man hinh} Circle(a,b,r); ... tính tổng số chẵn, số lẻ? Program Tinh_tong_dem; uses crt; var A: array [1 10] of integer; i,n,S,d1,d2,S1,S2: integer; Begin clrscr; write('Nhap so phan tu mang:'); readln(n); for i:=1 to n Begin...
... nhanh tốt Bài 3/ 199 9 - Dãy số nguyên (Dành cho học sinh THCS) Dãy cho dãy số tự nhiên viết liền nhau: 1234567 89 101112 99 100101102 99 9 100010011002 99 99 10000 9x1 =9 90 x = 180 90 0 x = 2700 90 00 ... Nhap so N: 4↵ 43 Cac so sieu nguyen to có chu so la: 2333 3 797 593 9 7 193 7331 7333 23 39 7 393 2 393 2 399 293 9 31 19 3137 3733 37 39 3 793 Tat ca co 16 so_ Bài 11/2000 - Số siêu nguyên tố (Dành cho ... C Thang'); if (A=0) and (B=1) and (C=0) then Write(' B Thang'); if (A=0) and (B=1) and (C=1) then Write(' A Thang'); if (A=1) and (B=0) and (C=0) then Write(' A Thang'); if (A=1) and (B=0) and...
... SELECT hocsinh.*, [toan]+[van]+[anh] AS tong, diem.van, diem.toan, diem.anh, Round([tong]/3,1) AS tb, IIf(([tb]>=8 and [anh]>5),"G",IIf(([tb]>=6.5 and [anh]>5),"K",IIf(([tb]>=5 and [anh]>=5),"tb",IIf([tb]>=3.5 ... JOIN diem ON hocsinh.mahs = diem.mahs; - Tính TB: SELECT hocsinh.*, [toan]+[van]+[anh] AS tong, diem.van, diem.toan, diem.anh, Round([tong]/3,1) AS tb FROM hocsinh INNER JOIN diem ON hocsinh.mahs ... điểm
... nội tiếp tam giác ABC Vậy M trùng với tâm đường tròn nội tiếp tam giác ABC thi P đạt giá trị nhỏ 0.5 0.5 Pmin≈11.3 89 7 79 Câu 10: (2 điểm) Cho số thực dương x, y, z thoả mãn: x ≥ y ≥ z 32-3x2=z2=164y2 ... ACS có = + 2 0.5 AK AS AC 1a 2a a = (0,5 điểm) Tứ giác AEKF có EF ⊥ AK nên: S= EF.AK = 2 a ≈2. 592 724 b S= 0.5 0.5 2/4 Câu 8: (2 điểm) Tìm nghiệm nguyên hệ phương trình: ⎧x + y + z = ⎨ 3 ⎩x + ... c = −1 ⇒ x = −5, y = z = ⎩bc = Vậy hệ có nghiệm (1 ;1 ;1) ,(4 ;4 ;-5) (4 ;-5 ;4) (-5 ;4 ;4) Câu 9: (2 điểm) Cho tam giác ABC có BC=a, CA=b, BA=c Từ điểm M 1.0 1.0 tam giác hạ đường vuông góc MA1,...
... 1,44 39 cm (0,50 đ) + T = 2π 1+4 ≈ 0,8886 s 250 (0,50 đ) Câu 4: (2 điểm) Đề bài: Một chất điểm chuyển động tròn với bán kính quĩ đạo 3,5cm, thời gian chuyển động hết vòng 12s Chọn mốc thời gian ... chu kì, ta chọn lại mốc thời gian i = cos(100πt + ϕ) = sin100πt (0,25 đ) + Điện tích chạy qua thời gian dt dq = idt điện tích chạy qua tiết diện dây dẫn t t 0 thời gian t kể từ dòng điện triệt tiêu ... + ≈ 0, 894 4 ϕ1 = - |arccos (0,50 đ) | ≈ - 26,56510 = 260 33' 54" (0,50 đ) Câu 8: (2 điểm) Đề bài: Một ròng rọc có bán kính R = 5cm, khối lượng M = 2kg, quay không ma sát quanh trục nằm ngang Cuốn...
... Thông tin cần thi t: Kinh tế chung phát triển, doanh nghiệp kinh doanh hiệu Kinh tế chung phát triển: kinh tế lên, đội ngũ nhân viên ko đáp ứng đủ nhu cầu kinh doanh công ty Doanh nghiệp kinh doanh ... AV, vi tính Thông tin cần thi t: Nhu cầu mở rộng kinh doanh, tình hình quỹ lương công ty Nhu cầu mở rộng kinh doanh: Công ty cần mở rộng kinh doanh, phòng kinh doanh thi t nhân lực, tuyển thêm ... Simulating Teamwork): Hệ thống hỗ trợ xử lý thông tin định Do nhà nghiên cứu Trường Khoa học Công nghệ Thông tin bang Penn - IST (Mỹ) phát triển Phần mềm làm bật liệu liên quan, giúp cải thi n...
... 79 a 80 x 81 x 82 the 83 the 84 a 85 the III READING (5 marks) Part 1: (1.0 mark) (mỗi câu 0.1 điểm) 86 A 91 B 87 B 92 C 88 D 93 C Part 2: (1.0 mark) (mỗi câu 0.2 điểm) 96 B 97 A 98 B 89 B 94 ... D 90 A 95 B 99 C 100 B Part 3: (2.0 marks) (mỗi câu 0.2 điểm) 101 emphasis 106 parents Hướng dẫn chấm có 03 trang 102 against 103 extended 107 elders 108 spoken 104 Thus/ Therefore 1 09 Asians ... fun 47 coming to come 48 altogether together 49 be posed pose 50 to make makes 51 anything something 52 plan planning 53 light lighting 54 sure of sure 55 In With Part 4: (1 mark)...
... nước Trình bày liên quan trình hấp thụ chất khoáng với hoạt động quang hợp hô hấp Cây xanh hấp thụ NO3-và NH3 để sinh tổng hợp axit amin protein cần lượng sản sinh trình quang hợp hô hấp Cây hấp ... lam) Anabaenaa azollae sống nước ruộng lúa thực hai trính cố định nitow điều kiện yếm khí quang hợp sản sinh oxi Tế bào khoogn thể thực hai chức năng: quang họp có điịnh nitow oxi trình quang ... tryptophan a Tryptophan loại hợp chất vi trùng thương hàn? b Từ vi trùng thương hàn cách chiếu tia tử ngoại (UV) với liều lượng hạn chế người ta thu chủng có khả tự tổng hợp tryptophan Vì sao?...
... KỲ THI CHỌN HỌC SINH GIỎI TỈNH CẤP THCS - NĂM HỌC 2010-2011 LỜI GIẢI MÔN TOÁN LỚP (Lời giải gồm 02 trang) Bài Bài Đápán 1 a) x − − (m + 1)(x − ) + ... mãn) b − 2a ≠ g(1) = − ≠ m = 11 Vậy cácgiá trị m cần tìm m = ; m = 1 1 1 1 a) Từ giả thi t ( + + ) = + + ⇒ 2( + + ) = ⇒ a + b + c = a b c a b c ab bc ca 3 3 ⇒ a + b = −c ⇒ a + b + 3ab(a ... 2010 (y =1) max P = 120 605 021 Giá trị nhỏ P đạt x = 1006 (y = 1005) P = 035 205 401 a) Từ giả thi t suy ra: · · MEO = NOF (đồng vị) · · MOE = NFO (đồng vị) M K N nên ∆EMO ~ ∆ONF ME OM = ⇒ ME.NF=OM.ON...